revert-buffer is not necessary for epa-dired-do-verify.

diff --git a/epa-dired.el b/epa-dired.el
index 5fcebfa..993fb29 100644 (file)
--- a/epa-dired.el
+++ b/epa-dired.el
@@ -54,8 +54,7 @@
   (let ((file-list (dired-get-marked-files)))
     (while file-list
       (epa-verify-file (expand-file-name (car file-list)))
-      (setq file-list (cdr file-list)))
-    (revert-buffer)))
+      (setq file-list (cdr file-list)))))
 
 (defun epa-dired-do-sign ()
   "Sign marked files."

diff --git a/epa.el b/epa.el
index 6e5fe12..0c90a7c 100644 (file)
--- a/epa.el
+++ b/epa.el
@@ -436,15 +436,15 @@
         signature)
     (message "Verifying %s..." (file-name-nondirectory file))
     (epg-verify-file context file plain)
+    (message "Verifying %s...done" (file-name-nondirectory file))
     (setq signature (reverse (epg-context-result-for context 'verify)))
     (while signature
-      (message "%s: %s %s %s\n"
+      (message "%s: %s %s %s"
               (epg-signature-status (car signature))
               (epg-signature-key-id (car signature))
               (epg-signature-user-id (car signature))
               (epg-signature-validity (car signature)))
-      (setq signature (cdr signature)))
-    (message "Verifying %s...done" (file-name-nondirectory file))))
+      (setq signature (cdr signature)))))
 
 (defun epa-sign-file (file detached)
   (interactive