Commit 7450df5d authored by Lars Magne Ingebrigtsen's avatar Lars Magne Ingebrigtsen
Browse files

(epa-passphrase-callback-function): Say what we're querying the password for.

parent cf321e50
2010-10-09 Lars Magne Ingebrigtsen <larsi@gnus.org>
 
* epa.el (epa-passphrase-callback-function): Say what we're
querying the password for.
* ibuffer.el (ibuffer-visit-buffer): To mimick list-buffers
behaviour, don't bury the ibuffer buffer when visiting other
buffers.
......
......@@ -635,8 +635,15 @@ If SECRET is non-nil, list secret keys instead of public keys."
(defun epa-passphrase-callback-function (context key-id handback)
(if (eq key-id 'SYM)
(read-passwd "Passphrase for symmetric encryption: "
(eq (epg-context-operation context) 'encrypt))
(read-passwd
(format "Passphrase for symmetric encryption%s: "
(let ((elem (epg-context-passphrase-callback context)))
;; Add the file name to the prompt, if any.
(if (and (consp elem)
(stringp (cdr elem)))
(format " for %s" (cdr elem))
"")))
(eq (epg-context-operation context) 'encrypt))
(read-passwd
(if (eq key-id 'PIN)
"Passphrase for PIN: "
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment