From: ueno <ueno>
Date: Sun, 10 Sep 2006 02:45:33 +0000 (+0000)
Subject: Fixed.
X-Git-Tag: epg-0_0_6~28
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=8bf5a7d1d30d7e7272ec91b9a11ffbb2d00198ea;p=elisp%2Fepg.git

Fixed.
---

diff --git a/epa-file.el b/epa-file.el
index d02e789..b1743ee 100644
--- a/epa-file.el
+++ b/epa-file.el
@@ -110,10 +110,13 @@
 		  (decode-coding-inserted-region
 		   (point-min) (point-max)
 		   (substring file 0 (string-match epa-file-name-regexp file))
-		   visit beg end replace))
-	      (insert (decode-coding-string string (or coding-system-for-read
-						       'undecided))))
-	    (setq length (length string))
+		   visit beg end replace)
+		  (setq length (- (point-max) (point-min))))
+	      (setq string (decode-coding-string string
+						 (or coding-system-for-read
+						     'undecided))
+		    length (length string))
+	      (insert string))
 	    (if replace
 		(delete-region (point) (point-max)))))
       (if (and local-copy