summaryrefslogtreecommitdiff
path: root/lisp/epa-file.el
diff options
context:
space:
mode:
authorDaiki Ueno <ueno@unixuser.org>2010-10-10 10:45:45 +0900
committerDaiki Ueno <ueno@unixuser.org>2010-10-10 10:45:45 +0900
commit446b12da60f307f6be854cae341be194213a5ab1 (patch)
tree42dd597c884e05f23ea2f5286bb4859cbfec4cfe /lisp/epa-file.el
parentf7aa248a5b1ce15ac2a3b70b4a55833d9d1eb44b (diff)
downloademacs-446b12da60f307f6be854cae341be194213a5ab1.tar.gz
Simplify 2010-10-09T13:27:24Z!larsi@gnus.org.
* epa.el (epa-passphrase-callback-function): Display filename passed as the 3rd arg. * epa-file.el (epa-file-passphrase-callback-function): Pass filename to epa-passphrase-callback-function.
Diffstat (limited to 'lisp/epa-file.el')
-rw-r--r--lisp/epa-file.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/epa-file.el b/lisp/epa-file.el
index 3c6cf07ea1b..95d8423020b 100644
--- a/lisp/epa-file.el
+++ b/lisp/epa-file.el
@@ -67,10 +67,11 @@ way."
(cons entry
epa-file-passphrase-alist)))
(setq passphrase (epa-passphrase-callback-function context
- key-id nil))
+ key-id
+ file))
(setcdr entry (copy-sequence passphrase))
passphrase))))
- (epa-passphrase-callback-function context key-id nil)))
+ (epa-passphrase-callback-function context key-id file)))
;;;###autoload
(defun epa-file-handler (operation &rest args)