aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorEli Zaretskii2023-12-09 10:54:07 +0200
committerEli Zaretskii2023-12-09 10:54:07 +0200
commitdc7cf87bc04d74005c11a2cfde9ccbcacc21d11b (patch)
tree31782c9a06180d637e8eb6dae6473da36d14c01a
parent414301bce19e24889ce970d60f798e178e556818 (diff)
downloademacs-dc7cf87bc04d74005c11a2cfde9ccbcacc21d11b.tar.gz
emacs-dc7cf87bc04d74005c11a2cfde9ccbcacc21d11b.zip
; Fix documentation of 'dired-do-open'
* lisp/dired-aux.el (dired-do-open): * etc/NEWS: Fix documentation of 'dired-do-open'. (Bug#18132)
-rw-r--r--etc/NEWS6
-rw-r--r--lisp/dired-aux.el11
2 files changed, 11 insertions, 6 deletions
diff --git a/etc/NEWS b/etc/NEWS
index 03a40c11c5b..93cecfe2d32 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -512,8 +512,10 @@ and a universal command such as "open" or "start"
512that delegates to the OS. 512that delegates to the OS.
513 513
514*** New command 'dired-do-open'. 514*** New command 'dired-do-open'.
515Bound to the context menu "Open", delegates opening the marked files 515This command is bound to "Open" in the context menu; it "opens" the
516to the OS. 516marked or clicked on files according to the OS conventions. For
517example, on systems supporting XDG, this runs 'xdg-open' on the
518files.
517 519
518** Ediff 520** Ediff
519 521
diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el
index 0998e76c410..44e9ae3701e 100644
--- a/lisp/dired-aux.el
+++ b/lisp/dired-aux.el
@@ -1405,10 +1405,13 @@ after adding own commands to the composite list."
1405(declare-function w32-shell-execute "w32fns.c") 1405(declare-function w32-shell-execute "w32fns.c")
1406 1406
1407(defun dired-do-open (&optional arg) 1407(defun dired-do-open (&optional arg)
1408 "Open the marked files or a file at click/point externally. 1408 "Open all marked (or next ARG) files using an external program.
1409If files are marked, run the command from `shell-command-guess-open' 1409This \"opens\" the file(s) using the external command that is most
1410on each of marked files. Otherwise, run it on the file where 1410appropriate for the file(s) according to the system conventions.
1411the mouse is clicked, or on the file at point." 1411If files are marked, run the command on each marked file. Otherwise,
1412run it on the next ARG files, or on the file at mouse-click, or on the
1413file at point. The appropriate command to \"open\" a file on each
1414system is determined by `shell-command-guess-open'."
1412 (interactive "P" dired-mode) 1415 (interactive "P" dired-mode)
1413 (let ((files (if (mouse-event-p last-nonmenu-event) 1416 (let ((files (if (mouse-event-p last-nonmenu-event)
1414 (save-excursion 1417 (save-excursion