(dired-prev-marked-file): Doc fix (bug#14855).

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ce252d7bb384d9bc947ee16610a3b4bf27fed54b..86eadb3f1dd2aa17cb9a70945f590dea3b6230be 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,6 +1,7 @@
 2014-02-08  Lars Ingebrigtsen  <larsi@gnus.org>
 
        * dired.el (dired-mode-map): Make :help text more accurate (bug#14893).
+       (dired-prev-marked-file): Doc fix (bug#14855).
 
        * minibuffer.el (read-file-name): Doc clarification (bug#15096).
 

diff --git a/lisp/dired.el b/lisp/dired.el
index d463d3f626db4bbe8615eac1fbf8eab6d3870268..742c95839417a45fd96a0db7606bfd6d1a31a532 100644 (file)
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -3140,7 +3140,9 @@ argument or confirmation)."
   (save-excursion (not (dired-move-to-filename))))
 
 (defun dired-next-marked-file (arg &optional wrap opoint)
-  "Move to the next marked file, wrapping around the end of the buffer."
+  "Move to the next marked file.
+If WRAP is non-nil, wrap around to the beginning of the buffer if
+we reach the end."
   (interactive "p\np")
   (or opoint (setq opoint (point)));; return to where interactively started
   (if (if (> arg 0)
@@ -3157,7 +3159,9 @@ argument or confirmation)."
       (dired-next-marked-file arg nil opoint))))
 
 (defun dired-prev-marked-file (arg &optional wrap)
-  "Move to the previous marked file, wrapping around the end of the buffer."
+  "Move to the previous marked file.
+If WRAP is non-nil, wrap around to the end of the buffer if we
+reach the beginning of the buffer."
   (interactive "p\np")
   (dired-next-marked-file (- arg) wrap))