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. |