diff options
| -rw-r--r-- | lisp/dired.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/dired.el b/lisp/dired.el index 59fb21a004f..2974b386d0b 100644 --- a/lisp/dired.el +++ b/lisp/dired.el | |||
| @@ -3043,6 +3043,10 @@ Thus, use \\[backward-page] to find the beginning of a group of errors." | |||
| 3043 | (insert "\f\n"))))))) | 3043 | (insert "\f\n"))))))) |
| 3044 | 3044 | ||
| 3045 | (defun dired-log-summary (string failures) | 3045 | (defun dired-log-summary (string failures) |
| 3046 | "State a summary of a command's failures, in echo area and log buffer. | ||
| 3047 | STRING is an overall summary of the failures. | ||
| 3048 | FAILURES is a list of file names that we failed to operate on, | ||
| 3049 | or nil if file names are not applicable." | ||
| 3046 | (if (= (length failures) 1) | 3050 | (if (= (length failures) 1) |
| 3047 | (message "%s" | 3051 | (message "%s" |
| 3048 | (with-current-buffer dired-log-buffer | 3052 | (with-current-buffer dired-log-buffer |