diff options
| author | Kenichi Handa | 1997-06-18 12:55:14 +0000 |
|---|---|---|
| committer | Kenichi Handa | 1997-06-18 12:55:14 +0000 |
| commit | 2792ce1648a24401678c4d7d15b8948bcf076689 (patch) | |
| tree | 1d21d4860776c8c96220cdfb145e7039f53a1fce | |
| parent | d0b9c3ab1f808b40575f514b1530e71b19e70a1e (diff) | |
| download | emacs-2792ce1648a24401678c4d7d15b8948bcf076689.tar.gz emacs-2792ce1648a24401678c4d7d15b8948bcf076689.zip | |
Change mnemonic letters for iso-2022-7bit-ss2 and
iso-2022-7bit-lock. Set coding-category-iso-8-2 to
japanese-iso-8bit.
| -rw-r--r-- | lisp/international/mule-conf.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/international/mule-conf.el b/lisp/international/mule-conf.el index 442232105a6..448b5890c6e 100644 --- a/lisp/international/mule-conf.el +++ b/lisp/international/mule-conf.el | |||
| @@ -244,16 +244,16 @@ | |||
| 244 | short ascii-eol ascii-cntl seven)) | 244 | short ascii-eol ascii-cntl seven)) |
| 245 | 245 | ||
| 246 | (make-coding-system | 246 | (make-coding-system |
| 247 | 'iso-2022-7bit-ss2 2 ?< | 247 | 'iso-2022-7bit-ss2 2 ?$ |
| 248 | "ISO 2022 based 7-bit encoding using SS2 for 96-charset" | 248 | "ISO 2022 based 7-bit encoding using SS2 for 96-charset" |
| 249 | '((ascii t) nil t nil | 249 | '((ascii t) nil t nil |
| 250 | short ascii-eol ascii-cntl seven nil single-shift)) | 250 | short ascii-eol ascii-cntl seven nil single-shift)) |
| 251 | 251 | ||
| 252 | (make-coding-system | 252 | (make-coding-system |
| 253 | 'iso-2022-7bit-lock 2 ?> | 253 | 'iso-2022-7bit-lock 2 ?& |
| 254 | "ISO-2022 coding system using Locking-Shift for 96-charset" | 254 | "ISO-2022 coding system using Locking-Shift for 96-charset" |
| 255 | '((ascii t) t nil nil | 255 | '((ascii t) t nil nil |
| 256 | nil ascii-eol ascii-cntl locking-shift)) | 256 | nil ascii-eol ascii-cntl seven locking-shift)) |
| 257 | 257 | ||
| 258 | (define-coding-system-alias 'iso-2022-7bit-lock 'iso-2022-int-1) | 258 | (define-coding-system-alias 'iso-2022-7bit-lock 'iso-2022-int-1) |
| 259 | 259 | ||
| @@ -293,14 +293,14 @@ | |||
| 293 | 293 | ||
| 294 | ;; This setting is just to read an Emacs Lisp source files which | 294 | ;; This setting is just to read an Emacs Lisp source files which |
| 295 | ;; contain multilingual text while dumping Emacs. More appropriate | 295 | ;; contain multilingual text while dumping Emacs. More appropriate |
| 296 | ;; values are set by the command `setup-language-environment' for each | 296 | ;; values are set by the command `set-language-environment' for each |
| 297 | ;; language environment. | 297 | ;; language environment. |
| 298 | 298 | ||
| 299 | (setq coding-category-emacs-mule 'emacs-mule | 299 | (setq coding-category-emacs-mule 'emacs-mule |
| 300 | coding-category-sjis 'japanese-shift-jis | 300 | coding-category-sjis 'japanese-shift-jis |
| 301 | coding-category-iso-7 'iso-2022-7bit | 301 | coding-category-iso-7 'iso-2022-7bit |
| 302 | coding-category-iso-8-1 'iso-latin-1 | 302 | coding-category-iso-8-1 'iso-latin-1 |
| 303 | coding-category-iso-8-2 'iso-latin-1 | 303 | coding-category-iso-8-2 'japanese-iso-8bit |
| 304 | coding-category-iso-else 'iso-2022-7bit-lock | 304 | coding-category-iso-else 'iso-2022-7bit-lock |
| 305 | coding-category-big5 'chinese-big5 | 305 | coding-category-big5 'chinese-big5 |
| 306 | coding-category-binary 'no-conversion) | 306 | coding-category-binary 'no-conversion) |