]> code.delx.au - gnu-emacs-elpa/commitdiff
Fix operation arg of callback.
authorThierry Volpiatto <thierry.volpiatto@gmail.com>
Sat, 30 Apr 2016 19:03:48 +0000 (21:03 +0200)
committerThierry Volpiatto <thierry.volpiatto@gmail.com>
Sat, 30 Apr 2016 19:03:48 +0000 (21:03 +0200)
* dired-async.el (dired-async-after-file-create):
Use the car.

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