Commit ccb77b4e authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files


Don't make buffer unibyte unless we seem to be visiting a file.
parent fd3613d7
......@@ -845,10 +845,12 @@ function by default."
(modified-p (buffer-modified-p)))
(when coding-system
(set-buffer-file-coding-system coding-system)
(if (or (eq coding-system 'no-conversion)
(eq (coding-system-type coding-system) 5))
;; It seems that random 8-bit codes are read. We had
;; better edit this buffer without multibyte characters.
(if (and (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))
;; For coding systems no-conversion and raw-text...,
;; edit the buffer as unibyte.
(set-buffer-multibyte nil))
(set-buffer-modified-p modified-p))))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment