diff options
Diffstat (limited to 'lisp/email.el')
-rw-r--r-- | lisp/email.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/email.el b/lisp/email.el index e8672d6..629d3c6 100644 --- a/lisp/email.el +++ b/lisp/email.el @@ -105,5 +105,7 @@ (when armor-start (let ((armor-end (re-search-forward "^-----END PGP MESSAGE-----$" nil t))) (when armor-end - (epa-decrypt-armor-in-region armor-start armor-end)))))))) - + ;; Don't ask if I want to replace the text. Just do it. + (flet ((yes-or-no-p (&rest args) t) + (y-or-n-p (&rest args) t)) + (epa-decrypt-armor-in-region armor-start armor-end))))))))) |