From 72d762d1971731259967fb61a4e784ac747ecaa2 Mon Sep 17 00:00:00 2001
From: ueno <ueno>
Date: Sun, 31 Dec 2006 08:54:54 +0000
Subject: [PATCH] Fixed.

---
 epa.el |    4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/epa.el b/epa.el
index f486b8e..8db243e 100644
--- a/epa.el
+++ b/epa.el
@@ -754,7 +754,7 @@ Don't use this command in Lisp programs!"
 		   plain
 		   (or coding-system-for-read
 		       (get-text-property start 'epa-coding-system-used))))
-      (if (y-or-n-p "Replace the text in the region? ")
+      (if (y-or-n-p "Replace the original text? ")
 	  (let ((inhibit-read-only t)
 		buffer-read-only)
 	    (delete-region start end)
@@ -907,6 +907,7 @@ If no one is selected, default secret key is used.  "
 				       mode))
       (message "Signing...done")
       (delete-region start end)
+      (goto-char start)
       (add-text-properties (point)
 			   (progn
 			     (insert (epa--decode-coding-string
@@ -997,6 +998,7 @@ If no one is selected, symmetric encryption will be performed.  "))))
 				       recipients))
       (message "Encrypting...done")
       (delete-region start end)
+      (goto-char start)
       (add-text-properties (point)
 			   (progn
 			     (insert cipher)
-- 
1.7.10.4