[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r105464: Fix previous change.
From: |
Richard Stallman |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r105464: Fix previous change. |
Date: |
Mon, 15 Aug 2011 22:18:10 -0400 |
User-agent: |
Bazaar (2.3.1) |
------------------------------------------------------------
revno: 105464
committer: Richard Stallman <address@hidden>
branch nick: trunk
timestamp: Mon 2011-08-15 22:18:10 -0400
message:
Fix previous change.
modified:
lisp/epa.el
=== modified file 'lisp/epa.el'
--- a/lisp/epa.el 2011-08-16 02:06:32 +0000
+++ b/lisp/epa.el 2011-08-16 02:18:10 +0000
@@ -843,15 +843,15 @@
(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)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r105464: Fix previous change.,
Richard Stallman <=