procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Improve documentation of dired-next/prev-marked-file

Browse source 
* lisp/dired.el (dired-next-marked-file, dired-prev-marked-file):
Doc fixes.  (Bug#29340)
This commit is contained in:
Eli Zaretskii 2017-11-18 11:42:06 +02:00
parent 90add182a4
commit 3e80124098
1 changed files with 13 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

19
lisp/dired.el
View file

@ -3363,9 +3363,14 @@ argument or confirmation)."
(save-excursion (not (dired-move-to-filename)))) (save-excursion (not (dired-move-to-filename))))
(defun dired-next-marked-file (arg &optional wrap opoint) (defun dired-next-marked-file (arg &optional wrap opoint)
"Move to the next marked file. "Move to the ARGth next marked file.
If WRAP is non-nil, wrap around to the beginning of the buffer if ARG is the numeric prefix argument and defaults to 1.
we reach the end." If WRAP is non-nil, which happens interactively, wrap around
to the beginning of the buffer and search from there, if no
marked file is found after this line.
Optional argument OPOINT specifies the buffer position to
return to if no ARGth marked file is found; it defaults to
the position where this command was invoked."
(interactive "p\np") (interactive "p\np")
(or opoint (setq opoint (point)));; return to where interactively started (or opoint (setq opoint (point)));; return to where interactively started
(if (if (> arg 0) (if (if (> arg 0)
@ -3382,9 +3387,11 @@ we reach the end."
(dired-next-marked-file arg nil opoint)))) (dired-next-marked-file arg nil opoint))))
(defun dired-prev-marked-file (arg &optional wrap) (defun dired-prev-marked-file (arg &optional wrap)
"Move to the previous marked file. "Move to the ARGth previous marked file.
If WRAP is non-nil, wrap around to the end of the buffer if we ARG is the numeric prefix argument and defaults to 1.
reach the beginning of the buffer." If WRAP is non-nil, which happens interactively, wrap around
to the end of the buffer and search backwards from there, if
no ARGth marked file is found before this line."
(interactive "p\np") (interactive "p\np")
(dired-next-marked-file (- arg) wrap)) (dired-next-marked-file (- arg) wrap))