From 850101edca5460c14e246a6e5f2f77e553a8acec Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 17 Aug 1997 01:04:47 +0000 Subject: [PATCH] (make-coding-system): Add a new FLAGS element ACCEPT-LATIN-EXTRA-CODE. (load-with-code-conversion): Bind enable-multibyte-characters to t. --- lisp/international/mule.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/international/mule.el b/lisp/international/mule.el index 460f04a3ad4..6af3b5ddd62 100644 --- a/lisp/international/mule.el +++ b/lisp/international/mule.el @@ -49,6 +49,7 @@ Return t if file exists." ;; We can't use `generate-new-buffer' because files.el ;; is not yet loaded. (get-buffer-create (generate-new-buffer-name " *load*")))) + (enable-multibyte-characters t) (load-in-progress t)) (or nomessage (message "Loading %s..." file)) (unwind-protect @@ -360,7 +361,7 @@ FLAGS specifies more precise information of each TYPE. CHARSET0, CHARSET1, CHARSET2, CHARSET3, SHORT-FORM, ASCII-EOL, ASCII-CNTL, SEVEN, LOCKING-SHIFT, SINGLE-SHIFT, USE-ROMAN, USE-OLDJIS, NO-ISO6429, INIT-BOL, DESIGNATION-BOL, - SAFE. + SAFE, ACCEPT-LATIN-EXTRA-CODE. CHARSETn are character sets initially designated to Gn graphic registers. If CHARSETn is nil, Gn is never used. If CHARSETn is t, Gn can be used but nothing designated initially. @@ -382,6 +383,9 @@ FLAGS specifies more precise information of each TYPE. at beginning of line on output. SAFE non-nil means convert unexpected characters to `?' on output. Unexpected characters are what not specified in CHARSETn directly. + ACCEPT-LATIN-EXTRA-CODE non-nil means code-detection routine accepts + a code specified in `latin-extra-code-table' (which see) as a valid + code of the coding system. If TYPE is 4 (private), FLAGS should be a cons of CCL programs, for encoding and decoding. See the documentation of CCL for more detail." -- 2.39.5