Function: epa-verify-file
epa-verify-file is an autoloaded, interactive and byte-compiled
function defined in epa.el.gz.
Signature
(epa-verify-file FILE)
Documentation
Verify FILE.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/epa.el.gz
;;;###autoload
(defun epa-verify-file (file)
"Verify FILE."
(interactive "fFile: ")
(setq file (expand-file-name file))
(let* ((context (epg-make-context epa-protocol))
(plain (if (equal (file-name-extension file) "sig")
(file-name-sans-extension file))))
(epg-context-set-progress-callback context
(cons
#'epa-progress-callback-function
(format "Verifying %s..."
(file-name-nondirectory file))))
(message "Verifying %s..." (file-name-nondirectory file))
(condition-case error
(epg-verify-file context file plain)
(error
(epa-display-error context)
(signal (car error) (cdr error))))
(message "Verifying %s...done" (file-name-nondirectory file))
(if (epg-context-result-for context 'verify)
(epa-display-info (epg-verify-result-to-string
(epg-context-result-for context 'verify)))
(message "Verification not successful"))))