]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix previous change.
authorRichard M. Stallman <rms@gnu.org>
Tue, 16 Aug 2011 02:18:10 +0000 (22:18 -0400)
committerRichard M. Stallman <rms@gnu.org>
Tue, 16 Aug 2011 02:18:10 +0000 (22:18 -0400)
lisp/epa.el

index 8ab9e6006e686ac55f94590b81c15ba31d9d892e..f0ec1ece0d137207194b1a30839b788f74d3dbe8 100644 (file)
@@ -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)