Function: epa-passphrase-callback-function

epa-passphrase-callback-function is a byte-compiled function defined in epa.el.gz.

Signature

(epa-passphrase-callback-function CONTEXT KEY-ID HANDBACK)

Source Code

;; Defined in /usr/src/emacs/lisp/epa.el.gz
(defun epa-passphrase-callback-function (context key-id handback)
  (if (eq key-id 'SYM)
      (read-passwd
       (format "Passphrase for symmetric encryption%s: "
	       ;; Add the file name to the prompt, if any.
	       (if (stringp handback)
		   (format " for %s" handback)
		 ""))
       (eq (epg-context-operation context) 'encrypt))
    (read-passwd
     (if (eq key-id 'PIN)
	 "Passphrase for PIN: "
       (let ((entry (assoc key-id epg-user-id-alist)))
	 (if entry
	     (format "Passphrase for %s %s: " key-id (cdr entry))
	   (format "Passphrase for %s: " key-id)))))))