aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKenichi Handa2000-06-08 11:12:03 +0000
committerKenichi Handa2000-06-08 11:12:03 +0000
commit136e48e4ac0e15a6bf0e915d07be701dd4d7e0d0 (patch)
tree039e959707a670275fd67aafa38bb69de5ab6c5e
parentd3981b49bf59c655786abdd048ce4198062b4f8f (diff)
downloademacs-136e48e4ac0e15a6bf0e915d07be701dd4d7e0d0.tar.gz
emacs-136e48e4ac0e15a6bf0e915d07be701dd4d7e0d0.zip
(after-insert-file-set-buffer-file-coding-system): If the buffer
size is greater than INSERTED, judget that we are not visiting.
-rw-r--r--lisp/international/mule.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/international/mule.el b/lisp/international/mule.el
index f193ef7797f..bd9e75220e6 100644
--- a/lisp/international/mule.el
+++ b/lisp/international/mule.el
@@ -1083,8 +1083,10 @@ function by default."
1083 (if (and enable-multibyte-characters 1083 (if (and enable-multibyte-characters
1084 (or (eq coding-system 'no-conversion) 1084 (or (eq coding-system 'no-conversion)
1085 (eq (coding-system-type coding-system) 5)) 1085 (eq (coding-system-type coding-system) 5))
1086 ;; If buffer was unmodified, we must be visiting it. 1086 ;; If buffer was unmodified and the size is the
1087 (not modified-p)) 1087 ;; same as INSERTED, we must be visiting it.
1088 (not modified-p)
1089 (= (buffer-size) inserted))
1088 ;; For coding systems no-conversion and raw-text..., 1090 ;; For coding systems no-conversion and raw-text...,
1089 ;; edit the buffer as unibyte. 1091 ;; edit the buffer as unibyte.
1090 (let ((pos-byte (position-bytes (+ (point) inserted)))) 1092 (let ((pos-byte (position-bytes (+ (point) inserted))))