changeset 29504:09063dfdc92c

(after-insert-file-set-buffer-file-coding-system): If the buffer size is greater than INSERTED, judget that we are not visiting.
author Kenichi Handa <handa@m17n.org>
date Thu, 08 Jun 2000 11:12:03 +0000
parents 3a54bce05114
children ca9466e54ffe
files lisp/international/mule.el
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/mule.el	Thu Jun 08 11:09:58 2000 +0000
+++ b/lisp/international/mule.el	Thu Jun 08 11:12:03 2000 +0000
@@ -1083,8 +1083,10 @@
 	  (if (and enable-multibyte-characters
 		   (or (eq coding-system 'no-conversion)
 		       (eq (coding-system-type coding-system) 5))
-		   ;; If buffer was unmodified, we must be visiting it.
-		   (not modified-p))
+		   ;; If buffer was unmodified and the size is the
+		   ;; same as INSERTED, we must be visiting it.
+		   (not modified-p)
+		   (= (buffer-size) inserted))
 	      ;; For coding systems no-conversion and raw-text...,
 	      ;; edit the buffer as unibyte.
 	      (let ((pos-byte (position-bytes (+ (point) inserted))))