diff options
| -rw-r--r-- | lisp/international/mule.el | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/lisp/international/mule.el b/lisp/international/mule.el index c281db7d95d..236b48c9bdb 100644 --- a/lisp/international/mule.el +++ b/lisp/international/mule.el | |||
| @@ -1868,12 +1868,8 @@ The optional second arg VISIT non-nil means that we are visiting a file." | |||
| 1868 | (if last-coding-system-used | 1868 | (if last-coding-system-used |
| 1869 | (let ((coding-system | 1869 | (let ((coding-system |
| 1870 | (find-new-buffer-file-coding-system last-coding-system-used))) | 1870 | (find-new-buffer-file-coding-system last-coding-system-used))) |
| 1871 | (when coding-system | 1871 | (if coding-system |
| 1872 | ;; Tell set-buffer-file-coding-system not to mark the file | 1872 | (setq buffer-file-coding-system coding-system)))) |
| 1873 | ;; as modified; we just read it, and it's supposed to be unmodified. | ||
| 1874 | ;; Marking it modified would try to lock it, which would | ||
| 1875 | ;; check the modtime, and we don't want to do that again now. | ||
| 1876 | (set-buffer-file-coding-system coding-system t t)))) | ||
| 1877 | inserted) | 1873 | inserted) |
| 1878 | 1874 | ||
| 1879 | ;; The coding-spec and eol-type of coding-system returned is decided | 1875 | ;; The coding-spec and eol-type of coding-system returned is decided |