emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/dired-duplicates f7ae2d4d5d 1/2: Show message with numb


From: ELPA Syncer
Subject: [elpa] externals/dired-duplicates f7ae2d4d5d 1/2: Show message with number of duplicated files
Date: Sat, 4 Nov 2023 21:57:41 -0400 (EDT)

branch: externals/dired-duplicates
commit f7ae2d4d5d1532ed8c87223054a8e6af63dad276
Author: Harald Judt <h.judt@gmx.at>
Commit: Harald Judt <h.judt@gmx.at>

    Show message with number of duplicated files
    
    Signed-off-by: Harald Judt <h.judt@gmx.at>
---
 dired-duplicates.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/dired-duplicates.el b/dired-duplicates.el
index fb8dae5e69..99ba39a059 100644
--- a/dired-duplicates.el
+++ b/dired-duplicates.el
@@ -192,8 +192,8 @@ The args ARG and NOCONFIRM are passed through from
                 (append (list (car dired-directory))
                         (flatten-list results)))
     (dired-revert arg noconfirm)
-    (dired-duplicates--post-process-dired-buffer results))
-  (message "Reverting buffer complete."))
+    (dired-duplicates--post-process-dired-buffer results)
+    (message "Reverted buffer, found %d files having duplicates." (length 
results))))
 
 (when (< emacs-major-version 29)
   (defun dired-duplicates--do-delete (&optional arg)
@@ -249,7 +249,7 @@ The results will be shown in a Dired buffer."
     (if-let ((default-directory "/")
              (results (dired-duplicates--generate-grouped-results 
directories)))
         (progn
-          (message "Finding duplicate files in %s completed." truncated-dirs)
+          (message "Found %d files having duplicates." (length results))
           (dired (cons "/" (flatten-list results)))
           (set-keymap-parent dired-duplicates-map (current-local-map))
           (use-local-map dired-duplicates-map)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]