diff options
| -rw-r--r-- | lisp/international/mule.el | 6 |
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." (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)))) |