Mercurial > emacs

changeset 19395:cf115b0c7458

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(make-coding-system): Add a new FLAGS element ACCEPT-LATIN-EXTRA-CODE. (load-with-code-conversion): Bind enable-multibyte-characters to t.
author Richard M. Stallman <rms@gnu.org>
date Sun, 17 Aug 1997 01:04:47 +0000
parents 619697797214
children d0ffa428c6e3
files lisp/international/mule.el
diffstat 1 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/mule.el	Sat Aug 16 21:57:47 1997 +0000
+++ b/lisp/international/mule.el	Sun Aug 17 01:04:47 1997 +0000
@@ -49,6 +49,7 @@
 	      ;; 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 @@
       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 @@
       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."