From ddcfebf1ae00930dfa46339dca83f45628140df5 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 8 Sep 2006 11:58:18 +0000 Subject: [PATCH] (dired-log-summary): Add doc string. --- lisp/dired.el | 4 ++++ 1 file changed, 4 insertions(+) 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." (insert "\f\n"))))))) (defun dired-log-summary (string failures) + "State a summary of a command's failures, in echo area and log buffer. +STRING is an overall summary of the failures. +FAILURES is a list of file names that we failed to operate on, +or nil if file names are not applicable." (if (= (length failures) 1) (message "%s" (with-current-buffer dired-log-buffer -- 2.39.2