diff options
Diffstat (limited to 'lisp/epa.el')
| -rw-r--r-- | lisp/epa.el | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/lisp/epa.el b/lisp/epa.el index 49ff3455c23..ca0f07d5bae 100644 --- a/lisp/epa.el +++ b/lisp/epa.el @@ -637,12 +637,10 @@ If SECRET is non-nil, list secret keys instead of public keys." (if (eq key-id 'SYM) (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)) - ""))) + ;; 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) |