X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=epa.el;h=c95480ec67e36a5d222e25c8ba663e72d422ee44;hb=5312c05cb5a923991a4d5ab8de4b9fc53d21f0d2;hp=ea1f27c7829a4ae9e70807429c2c37e9d2d70b80;hpb=0aaa0d9d521bd62d32cf5b4f2a1d56a901804a76;p=elisp%2Fepg.git

diff --git a/epa.el b/epa.el
index ea1f27c..c95480e 100644
--- a/epa.el
+++ b/epa.el
@@ -438,15 +438,13 @@
   (interactive "fFile: ")
   (let* ((context (epg-make-context))
 	 (plain (if (equal (file-name-extension file) "sig")
-		    (file-name-sans-extension file)))
-	 signature)
+		    (file-name-sans-extension file))))
     (message "Verifying %s..." (file-name-nondirectory file))
     (epg-verify-file context file plain)
     (message "Verifying %s...done" (file-name-nondirectory file))
     (message "%s"
-	     (mapconcat #'epg-verify-result-to-string
-			(reverse (epg-context-result-for context 'verify))
-			"\n"))))
+	     (epg-verify-result-to-string
+	      (epg-context-result-for context 'verify)))))
 
 (defun epa-sign-file (file detached)
   (interactive