aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <[email protected]>2011-08-15 22:18:10 -0400
committerRichard M. Stallman <[email protected]>2011-08-15 22:18:10 -0400
commit44fede4d8e691afda7fdd35777793e1408fecca1 (patch)
treed59825f3a21e3f025bfc0e8a1cc4f856db39b917 /lisp
parentfe38beefade6a9c382aa6f6c1dd98edbfe4bceca (diff)
Fix previous change.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/epa.el18
1 files changed, 9 insertions, 9 deletions
diff --git a/lisp/epa.el b/lisp/epa.el
index 8ab9e6006e..f0ec1ece0d 100644
--- a/lisp/epa.el
+++ b/lisp/epa.el
@@ -843,15 +843,15 @@ For example:
(or coding-system-for-read
(get-text-property start 'epa-coding-system-used)
'undecided)))
- (if (y-or-n-p "Replace the original text? ")
- (let ((inhibit-read-only t))
- (delete-region start end)
- (goto-char start)
- (insert plain))
- (if make-buffer-function
- (with-current-buffer (funcall make-buffer-function)
- (let ((inhibit-read-only t))
- (insert plain)))
+ (if make-buffer-function
+ (with-current-buffer (funcall make-buffer-function)
+ (let ((inhibit-read-only t))
+ (insert plain)))
+ (if (y-or-n-p "Replace the original text? ")
+ (let ((inhibit-read-only t))
+ (delete-region start end)
+ (goto-char start)
+ (insert plain))
(with-output-to-temp-buffer "*Temp*"
(set-buffer standard-output)
(insert plain)