* epa.el (epa-display-verify-result): Make it obsolete.

[elisp/epg.git] / epa.el

diff --git a/epa.el b/epa.el
index 63767ff..948cf8f 100644 (file)
--- a/epa.el
+++ b/epa.el
@@ -532,6 +532,10 @@ If SECRET is non-nil, list secret keys instead of public keys."
        (goto-char (point-min)))
     (message "%s" info)))
 
+(defun epa-display-verify-result (verify-result)
+  (epa-display-info (epg-verify-result-to-string verify-result)))
+(make-obsolete 'epa-display-verify-result 'epa-display-info)
+
 (defun epa-passphrase-callback-function (context key-id handback)
   (if (eq key-id 'SYM)
       (read-passwd "Passphrase for symmetric encryption: "