Mercurial > emacs
comparison lisp/international/mule.el @ 29641:703433352fc4
(after-insert-file-set-buffer-file-coding-system): Call
set-buffer-file-coding-system with the arg FORCE t.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Wed, 14 Jun 2000 08:02:05 +0000 |
parents | ab979e3b519a |
children | 4f79b4ed9ebc |
comparison
equal
deleted
inserted
replaced
29640:cf567ae7be0e | 29641:703433352fc4 |
---|---|
1086 (if last-coding-system-used | 1086 (if last-coding-system-used |
1087 (let ((coding-system | 1087 (let ((coding-system |
1088 (find-new-buffer-file-coding-system last-coding-system-used)) | 1088 (find-new-buffer-file-coding-system last-coding-system-used)) |
1089 (modified-p (buffer-modified-p))) | 1089 (modified-p (buffer-modified-p))) |
1090 (when coding-system | 1090 (when coding-system |
1091 (set-buffer-file-coding-system coding-system) | 1091 (set-buffer-file-coding-system coding-system t) |
1092 (if (and enable-multibyte-characters | 1092 (if (and enable-multibyte-characters |
1093 (or (eq coding-system 'no-conversion) | 1093 (or (eq coding-system 'no-conversion) |
1094 (eq (coding-system-type coding-system) 5)) | 1094 (eq (coding-system-type coding-system) 5)) |
1095 ;; If buffer was unmodified and the size is the | 1095 ;; If buffer was unmodified and the size is the |
1096 ;; same as INSERTED, we must be visiting it. | 1096 ;; same as INSERTED, we must be visiting it. |