]> code.delx.au - gnu-emacs-elpa/blobdiff - dired-async.el
Fix operation arg of callback.
[gnu-emacs-elpa] / dired-async.el
index d97195354e820be70b0f5c55c147027a54d76318..c4dca0852ed09da00278f288a27ba88d7c826b0b 100644 (file)
@@ -141,13 +141,13 @@ Should take same args as `message'."
                   (funcall dired-async-message-function
                            "%s failed for %d of %d file%s"
                            'dired-async-failures
-                           operation (length failures)
+                           (car operation) (length failures)
                            total (dired-plural-s total)))
                  (skipped
                   (funcall dired-async-message-function
                            "%s: %d of %d file%s skipped"
                            'dired-async-failures
-                           operation (length skipped) total
+                           (car operation) (length skipped) total
                            (dired-plural-s total))))
            ;; Finally send the success message.
            (funcall dired-async-message-function