diff options
| author | Lars Ingebrigtsen | 2014-02-07 22:16:23 -0800 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2014-02-07 22:16:23 -0800 |
| commit | 8cff064c5e9b3fb7cdff4eea50d0d7dd31a3aa6f (patch) | |
| tree | 1a89ccebd0b5d2b7053ec449853b0aa00d675ff7 | |
| parent | be58a238be688e164ac58a9d39ecd7092bb0b626 (diff) | |
| download | emacs-8cff064c5e9b3fb7cdff4eea50d0d7dd31a3aa6f.tar.gz emacs-8cff064c5e9b3fb7cdff4eea50d0d7dd31a3aa6f.zip | |
(dired-prev-marked-file): Doc fix (bug#14855).
| -rw-r--r-- | lisp/ChangeLog | 1 | ||||
| -rw-r--r-- | lisp/dired.el | 8 |
2 files changed, 7 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ce252d7bb38..86eadb3f1dd 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,6 +1,7 @@ | |||
| 1 | 2014-02-08 Lars Ingebrigtsen <larsi@gnus.org> | 1 | 2014-02-08 Lars Ingebrigtsen <larsi@gnus.org> |
| 2 | 2 | ||
| 3 | * dired.el (dired-mode-map): Make :help text more accurate (bug#14893). | 3 | * dired.el (dired-mode-map): Make :help text more accurate (bug#14893). |
| 4 | (dired-prev-marked-file): Doc fix (bug#14855). | ||
| 4 | 5 | ||
| 5 | * minibuffer.el (read-file-name): Doc clarification (bug#15096). | 6 | * minibuffer.el (read-file-name): Doc clarification (bug#15096). |
| 6 | 7 | ||
diff --git a/lisp/dired.el b/lisp/dired.el index d463d3f626d..742c9583941 100644 --- a/lisp/dired.el +++ b/lisp/dired.el | |||
| @@ -3140,7 +3140,9 @@ argument or confirmation)." | |||
| 3140 | (save-excursion (not (dired-move-to-filename)))) | 3140 | (save-excursion (not (dired-move-to-filename)))) |
| 3141 | 3141 | ||
| 3142 | (defun dired-next-marked-file (arg &optional wrap opoint) | 3142 | (defun dired-next-marked-file (arg &optional wrap opoint) |
| 3143 | "Move to the next marked file, wrapping around the end of the buffer." | 3143 | "Move to the next marked file. |
| 3144 | If WRAP is non-nil, wrap around to the beginning of the buffer if | ||
| 3145 | we reach the end." | ||
| 3144 | (interactive "p\np") | 3146 | (interactive "p\np") |
| 3145 | (or opoint (setq opoint (point)));; return to where interactively started | 3147 | (or opoint (setq opoint (point)));; return to where interactively started |
| 3146 | (if (if (> arg 0) | 3148 | (if (if (> arg 0) |
| @@ -3157,7 +3159,9 @@ argument or confirmation)." | |||
| 3157 | (dired-next-marked-file arg nil opoint)))) | 3159 | (dired-next-marked-file arg nil opoint)))) |
| 3158 | 3160 | ||
| 3159 | (defun dired-prev-marked-file (arg &optional wrap) | 3161 | (defun dired-prev-marked-file (arg &optional wrap) |
| 3160 | "Move to the previous marked file, wrapping around the end of the buffer." | 3162 | "Move to the previous marked file. |
| 3163 | If WRAP is non-nil, wrap around to the end of the buffer if we | ||
| 3164 | reach the beginning of the buffer." | ||
| 3161 | (interactive "p\np") | 3165 | (interactive "p\np") |
| 3162 | (dired-next-marked-file (- arg) wrap)) | 3166 | (dired-next-marked-file (- arg) wrap)) |
| 3163 | 3167 | ||