diff options
author | Daiki Ueno <ueno@unixuser.org> | 2010-10-10 10:45:45 +0900 |
---|---|---|
committer | Daiki Ueno <ueno@unixuser.org> | 2010-10-10 10:45:45 +0900 |
commit | 446b12da60f307f6be854cae341be194213a5ab1 (patch) | |
tree | 42dd597c884e05f23ea2f5286bb4859cbfec4cfe /lisp/epa-file.el | |
parent | f7aa248a5b1ce15ac2a3b70b4a55833d9d1eb44b (diff) | |
download | emacs-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.el | 5 |
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) |