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

(standard-display-european): If AUTO is nil,

clear multibyte in *scratch*, and load latin-1.
parent ef316cf0
......@@ -186,7 +186,8 @@ codes for apostrophe and space.
With prefix argument, enable European character display iff arg is positive.
Normally, this function turns off `enable-multibyte-characters'
for all Emacs buffers, because users who call this function
for subsequently created Emacs buffers, and for `*scratch*.
This is because users who call this function
probably want to edit European characters in single-byte mode."
;; If the optional argument AUTO is non-nil, this function
......@@ -206,8 +207,12 @@ probably want to edit European characters in single-byte mode."
(set-terminal-coding-system nil)))
;; If the user does this explicitly,
;; turn off multibyte chars for more compatibility.
(or auto
(setq-default enable-multibyte-characters nil))
(unless auto
(setq-default enable-multibyte-characters nil)
(if (get-buffer "*scratch*")
(with-current-buffer "*scratch*"
(set-buffer-multibyte nil)
(load "latin-1"))))
(standard-display-8bit 160 255)
(unless (or noninteractive (eq window-system 'x))
;; Send those codes literally to a non-X terminal.
......
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