* lisp/epa.el (epa-decrypt-file): Apply epa-pinentry-mode (Bug#30363).

This commit is contained in:
Noam Postavsky 2018-04-27 07:27:59 -04:00
parent 5a5e4eb76a
commit 217202c084

View file

@ -701,6 +701,7 @@ If you do not specify PLAIN-FILE, this functions prompts for the value to use."
#'epa-progress-callback-function
(format "Decrypting %s..."
(file-name-nondirectory decrypt-file))))
(setf (epg-context-pinentry-mode context) epa-pinentry-mode)
(message "Decrypting %s..." (file-name-nondirectory decrypt-file))
(condition-case error
(epg-decrypt-file context decrypt-file plain-file)