summaryrefslogtreecommitdiff
path: root/lisp/epa-file.el
diff options
context:
space:
mode:
authorDaiki Ueno <ueno@gnu.org>2014-11-18 14:49:30 +0900
committerDaiki Ueno <ueno@gnu.org>2014-11-18 14:53:54 +0900
commit5224be2f7401bd9999b5442a94d0b2abf7f4da3b (patch)
tree413f1682a2061840c1c897629a6686827ba21e67 /lisp/epa-file.el
parentb12bb4dc3ecc74c99031538fc8d3565d276a18d7 (diff)
downloademacs-5224be2f7401bd9999b5442a94d0b2abf7f4da3b.tar.gz
epg: Simplify epa-pinentry-mode handling
* epa-file.el (epa-file-insert-file-contents) (epa-file-write-region): Remove redundant check of epa-pinentry-mode. * epa.el (epa-sign-file, epa-encrypt-file, epa-decrypt-region) (epa-sign-region, epa-encrypt-region): Remove redundant check of epa-pinentry-mode.
Diffstat (limited to 'lisp/epa-file.el')
-rw-r--r--lisp/epa-file.el6
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/epa-file.el b/lisp/epa-file.el
index cdaa8ba5f3d..2e46cf9da24 100644
--- a/lisp/epa-file.el
+++ b/lisp/epa-file.el
@@ -144,8 +144,7 @@ encryption is used."
context
(cons #'epa-progress-callback-function
(format "Decrypting %s" file)))
- (if epa-pinentry-mode
- (setf (epg-context-pinentry-mode context) epa-pinentry-mode))
+ (setf (epg-context-pinentry-mode context) epa-pinentry-mode)
(unwind-protect
(progn
(if replace
@@ -233,8 +232,7 @@ encryption is used."
(cons #'epa-progress-callback-function
(format "Encrypting %s" file)))
(setf (epg-context-armor context) epa-armor)
- (if epa-pinentry-mode
- (setf (epg-context-pinentry-mode context) epa-pinentry-mode))
+ (setf (epg-context-pinentry-mode context) epa-pinentry-mode)
(condition-case error
(setq string
(epg-encrypt-string