annotate lisp/international/mule-conf.el @ 18663:8b53028950ae

(undecided): Use `-' in mode line.
author Richard M. Stallman <rms@gnu.org>
date Mon, 07 Jul 1997 08:45:38 +0000
parents ee420f0a43f5
children afc6404f9637
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
1 ;;; mule-conf.el --- configure multilingual environment
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
2
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
3 ;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
18377
8b4a66c66dd6 Change copyright notice.
Richard M. Stallman <rms@gnu.org>
parents: 18302
diff changeset
4 ;; Licensed to the Free Software Foundation.
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
5
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
6 ;; Keywords: mule, multilingual, character set, coding system
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
7
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
8 ;; This file is part of GNU Emacs.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
9
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
10 ;; GNU Emacs is free software; you can redistribute it and/or modify
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
11 ;; it under the terms of the GNU General Public License as published by
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
12 ;; the Free Software Foundation; either version 2, or (at your option)
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
13 ;; any later version.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
14
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
15 ;; GNU Emacs is distributed in the hope that it will be useful,
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
16 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
17 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
18 ;; GNU General Public License for more details.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
19
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
20 ;; You should have received a copy of the GNU General Public License
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
21 ;; along with GNU Emacs; see the file COPYING. If not, write to the
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
22 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
23 ;; Boston, MA 02111-1307, USA.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
24
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
25 ;;; Commentary:
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
26
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
27 ;; Don't byte-compile this file.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
28
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
29 ;;; Code:
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
30
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
31 ;;; Definitions of character sets.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
32
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
33 ;; Basic (official) character sets. These character sets are treated
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
34 ;; effectively in the aspect of memory in a buffer.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
35
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
36 ;; Syntax:
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
37 ;; (define-charset CHARSET-ID CHARSET
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
38 ;; [ DIMENSION CHARS WIDTH DIRECTION ISO-FINAL-CHAR ISO-GRAPHIC-PLANE
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
39 ;; SHORT-NAME LONG-NAME DESCRIPTION ])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
40 ;; ASCII charset is defined in src/charset.c as below.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
41 ;; (define-charset 0 ascii
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
42 ;; [1 94 1 0 ?B 0 "ASCII" "ASCII" "ASCII (ISO646 IRV)"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
43
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
44 (define-charset 129 'latin-iso8859-1
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
45 [1 96 1 0 ?A 1 "Latin-1" "ISO8859-1 (Latin-1)" "ISO8859-1 (Latin-1)"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
46 (define-charset 130 'latin-iso8859-2
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
47 [1 96 1 0 ?B 1 "Latin-2" "ISO8859-2 (Latin-2)" "ISO8859-2 (Latin-2)"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
48 (define-charset 131 'latin-iso8859-3
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
49 [1 96 1 0 ?C 1 "Latin-3" "ISO8859-3 (Latin-3)" "ISO8859-3 (Latin-3)"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
50 (define-charset 132 'latin-iso8859-4
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
51 [1 96 1 0 ?D 1 "Latin-4" "ISO8859-4 (Latin-4)" "ISO8859-4 (Latin-4)"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
52 (define-charset 133 'thai-tis620
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
53 [1 96 1 0 ?T 1 "TIS620" "TIS620 (Thai)" "TIS620.2529 (Thai)"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
54 (define-charset 134 'greek-iso8859-7
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
55 [1 96 1 0 ?F 1 "ISO8859-7" "ISO8859-7 (Greek)" "ISO8859-7 (Greek)"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
56 (define-charset 135 'arabic-iso8859-6
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
57 [1 96 1 1 ?G 1 "ISO8859-6" "ISO8859-6 (Arabic)" "ISO8859-6 (Arabic)"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
58 (define-charset 136 'hebrew-iso8859-8
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
59 [1 96 1 1 ?H 1 "ISO8859-8" "ISO8859-8 (Hebrew)" "ISO8859-8 (Hebrew)"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
60 (define-charset 137 'katakana-jisx0201
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
61 [1 94 1 0 ?I 1 "JISX0201 Kana" "JISX0201.1976 (Japanese Kana)"
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
62 "JISX0201.1976 Japanese Kana"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
63 (define-charset 138 'latin-jisx0201
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
64 [1 94 1 0 ?J 0 "JISX0201 Roman" "JISX0201.1976 (Japanese Roman)"
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
65 "JISX0201.1976 Japanese Roman"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
66 (define-charset 140 'cyrillic-iso8859-5
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
67 [1 96 1 0 ?L 1 "ISO8859-5" "ISO8859-5 (Cyrillic)"
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
68 "ISO8859-5 (Cyrillic)"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
69 (define-charset 141 'latin-iso8859-9
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
70 [1 96 1 0 ?M 1 "Latin-5" "ISO8859-9 (Latin-5)" "ISO8859-9 (Latin-5)"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
71 (define-charset 144 'japanese-jisx0208-1978
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
72 [2 94 2 0 ?@ 0 "JISX0208.1978" "JISX0208.1978 (Japanese)"
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
73 "JISX0208.1978 Japanese Kanji (so called \"old JIS\")"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
74 (define-charset 145 'chinese-gb2312
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
75 [2 94 2 0 ?A 0 "GB2312" "GB2312" "GB2312 Chinese simplified"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
76 (define-charset 146 'japanese-jisx0208
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
77 [2 94 2 0 ?B 0 "JISX0208" "JISX0208.1983/1990 (Japanese)"
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
78 "JISX0208.1983/1990 Japanese Kanji"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
79 (define-charset 147 'korean-ksc5601
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
80 [2 94 2 0 ?C 0 "KSC5601" "KSC5601 (Korean)"
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
81 "KSC5601 Korean Hangul and Hanja"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
82 (define-charset 148 'japanese-jisx0212
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
83 [2 94 2 0 ?D 0 "JISX0212" "JISX0212 (Japanese)"
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
84 "JISX0212 Japanese supplement"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
85 (define-charset 149 'chinese-cns11643-1
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
86 [2 94 2 0 ?G 0 "CNS11643-1" "CNS11643-1 (Chinese traditional)"
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
87 "CNS11643 Plane 1 Chinese traditional"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
88 (define-charset 150 'chinese-cns11643-2
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
89 [2 94 2 0 ?H 0 "CNS11643-2" "CNS11643-2 (Chinese traditional)"
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
90 "CNS11643 Plane 2 Chinese traditional"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
91 (define-charset 152 'chinese-big5-1
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
92 [2 94 2 0 ?0 0 "Big5" "Big5 (Level-1)"
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
93 "Big5 Level-1 Chinese traditional"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
94 (define-charset 153 'chinese-big5-2
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
95 [2 94 2 0 ?1 0 "Big5" "Big5 (Level-2)"
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
96 "Big5 Level-2 Chinese traditional"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
97
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
98 ;; Additional (private) character sets. These character sets are
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
99 ;; treated less effectively in the aspect of memory in a buffer.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
100
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
101 ;; Syntax:
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
102 ;; (define-charset nil CHARSET
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
103 ;; [ DIMENSION CHARS WIDTH DIRECTION ISO-FINAL-CHAR ISO-GRAPHIC-PLANE
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
104 ;; SHORT-NAME LONG-NAME DESCRIPTION ])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
105
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
106 ;; ISO-2022 allows a use of character sets not registered in ISO with
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
107 ;; final characters `0' (0x30) through `?' (0x3F). Among them, Emacs
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
108 ;; reserves `0' through `9' to support several private character sets.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
109 ;; The remaining final characters `:' through `?' are for users.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
110
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
111 (define-charset nil 'chinese-sisheng
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
112 [1 94 1 0 ?0 0 "SiSheng" "SiSheng (PinYin/ZhuYin)"
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
113 "SiSheng characters for PinYin/ZhuYin"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
114
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
115 ;; IPA characters for phonetic symbols.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
116 (define-charset nil 'ipa
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
117 [1 96 1 0 ?0 1 "IPA" "IPA" "IPA (International Phonetic Association)"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
118
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
119 ;; Vietnamese VISCII. VISCII is 1-byte character set which contains
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
120 ;; more than 96 characters. Since Emacs can't handle it as one
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
121 ;; character set, it is divided into two: lower case letters and upper
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
122 ;; case letters.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
123 (define-charset nil 'vietnamese-viscii-lower
17293
273b0cd6aac4 Change descriptions for Arabic, Indian, and
Kenichi Handa <handa@m17n.org>
parents: 17176
diff changeset
124 [1 96 1 0 ?1 1 "VISCII lower" "VISCII lower-case" "VISCII1.1 lower-case"])
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
125 (define-charset nil 'vietnamese-viscii-upper
17293
273b0cd6aac4 Change descriptions for Arabic, Indian, and
Kenichi Handa <handa@m17n.org>
parents: 17176
diff changeset
126 [1 96 1 0 ?2 1 "VISCII upper" "VISCII upper-case" "VISCII1.1 upper-case"])
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
127
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
128 ;; For Arabic, we need three different types of character sets.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
129 ;; Digits are of direction left-to-right and of width 1-column.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
130 ;; Others are of direction right-to-left and of width 1-column or
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
131 ;; 2-column.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
132 (define-charset nil 'arabic-digit
17293
273b0cd6aac4 Change descriptions for Arabic, Indian, and
Kenichi Handa <handa@m17n.org>
parents: 17176
diff changeset
133 [1 94 1 0 ?2 0 "Arabic digit" "Arabic digit" "Arabic digit"])
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
134 (define-charset nil 'arabic-1-column
17293
273b0cd6aac4 Change descriptions for Arabic, Indian, and
Kenichi Handa <handa@m17n.org>
parents: 17176
diff changeset
135 [1 94 1 1 ?3 0 "Arabic 1-col" "Arabic 1-column" "Arabic 1-column"])
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
136 (define-charset nil 'arabic-2-column
17293
273b0cd6aac4 Change descriptions for Arabic, Indian, and
Kenichi Handa <handa@m17n.org>
parents: 17176
diff changeset
137 [1 94 2 1 ?4 0 "Arabic 2-col" "Arabic 2-column" "Arabic 2-column"])
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
138
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
139 ;; Ethiopic characters (Amahric and Tigrigna).
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
140 (define-charset nil 'ethiopic
17176
12e0db4fd511 Change short and long names for Ethipic character set.
Kenichi Handa <handa@m17n.org>
parents: 17091
diff changeset
141 [2 94 2 0 ?3 0 "Ethiopic" "Ethiopic characters" "Ethiopic characters"])
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
142
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
143 ;; Chinese CNS11643 Plane3 thru Plane7. Although these are official
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
144 ;; character sets, the use is rare and don't have to be treated
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
145 ;; effectively in the aspect of memory in a buffer.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
146 (define-charset nil 'chinese-cns11643-3
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
147 [2 94 2 0 ?I 0 "CNS11643-3" "CNS11643-3 (Chinese traditional)"
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
148 "CNS11643 Plane 3 Chinese Traditional"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
149 (define-charset nil 'chinese-cns11643-4
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
150 [2 94 2 0 ?J 0 "CNS11643-4" "CNS11643-4 (Chinese traditional)"
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
151 "CNS11643 Plane 4 Chinese Traditional"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
152 (define-charset nil 'chinese-cns11643-5
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
153 [2 94 2 0 ?K 0 "CNS11643-5" "CNS11643-5 (Chinese traditional)"
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
154 "CNS11643 Plane 5 Chinese Traditional"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
155 (define-charset nil 'chinese-cns11643-6
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
156 [2 94 2 0 ?L 0 "CNS11643-6" "CNS11643-6 (Chinese traditional)"
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
157 "CNS11643 Plane 6 Chinese Traditional"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
158 (define-charset nil 'chinese-cns11643-7
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
159 [2 94 2 0 ?M 0 "CNS11643-7" "CNS11643-7 (Chinese traditional)"
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
160 "CNS11643 Plane 7 Chinese Traditional"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
161
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
162 ;; ASCII with right-to-left direction.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
163 (define-charset nil 'ascii-right-to-left
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
164 [1 94 1 1 ?B 0 "rev ASCII" "ASCII with right-to-left direction"
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
165 "ASCII (left half of ISO8859-1) with right-to-left direction"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
166
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
167 ;; Indian scripts. Symbolic charset for data exchange. Glyphs are
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
168 ;; not assigned. They are automatically converted to each Indian
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
169 ;; script which IS-13194 supports.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
170
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
171 (define-charset nil 'indian-is13194
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
172 [1 94 2 0 ?5 1 "IS 13194" "Indian IS 13194"
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
173 "Generic Indian charset for data exchange with IS 13194"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
174 ;; Actual Glyph for 2-column width.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
175 (define-charset nil 'indian-2-column
17293
273b0cd6aac4 Change descriptions for Arabic, Indian, and
Kenichi Handa <handa@m17n.org>
parents: 17176
diff changeset
176 [2 94 2 0 ?5 0 "Indian 2-col" "Indian 2 Column"
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
177 "Indian charset for 2-column width glyphs"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
178 ;; Actual Glyph for 1-column width.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
179 (define-charset nil 'indian-1-column
17293
273b0cd6aac4 Change descriptions for Arabic, Indian, and
Kenichi Handa <handa@m17n.org>
parents: 17176
diff changeset
180 [2 94 1 0 ?6 0 "Indian 1-col" "Indian 1 Column"
18560
ee420f0a43f5 Fix typo in doc-string of charset
Kenichi Handa <handa@m17n.org>
parents: 18529
diff changeset
181 "Indian charset for 2-column width glyphs"])
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
182
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
183 ;; Lao script.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
184 ;; ISO10646's 0x0E80..0x0EDF are mapped to 0x20..0x7F.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
185 (define-charset nil 'lao
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
186 [1 94 1 0 ?1 0 "Lao" "Lao" "Lao characters (ISO10646 0E80..0EDF)"])
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
187
17293
273b0cd6aac4 Change descriptions for Arabic, Indian, and
Kenichi Handa <handa@m17n.org>
parents: 17176
diff changeset
188 ;; Tibetan script.
273b0cd6aac4 Change descriptions for Arabic, Indian, and
Kenichi Handa <handa@m17n.org>
parents: 17176
diff changeset
189 (define-charset nil 'tibetan
273b0cd6aac4 Change descriptions for Arabic, Indian, and
Kenichi Handa <handa@m17n.org>
parents: 17176
diff changeset
190 [2 94 2 0 ?7 0 "Tibetan 2-col" "Tibetan 2 column" "Tibetan characters"])
273b0cd6aac4 Change descriptions for Arabic, Indian, and
Kenichi Handa <handa@m17n.org>
parents: 17176
diff changeset
191 (define-charset nil 'tibetan-1-column
273b0cd6aac4 Change descriptions for Arabic, Indian, and
Kenichi Handa <handa@m17n.org>
parents: 17176
diff changeset
192 [2 94 1 0 ?8 0 "Tibetan 1-col" "Tibetan 1 column" "Tibetan 1 column glyph"])
273b0cd6aac4 Change descriptions for Arabic, Indian, and
Kenichi Handa <handa@m17n.org>
parents: 17176
diff changeset
193
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
194 ;; Tell C code charset ID's of several charsets.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
195 (setup-special-charsets)
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
196
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
197
18560
ee420f0a43f5 Fix typo in doc-string of charset
Kenichi Handa <handa@m17n.org>
parents: 18529
diff changeset
198 ;; These are tables for unifying characters on decoding and encoding.
ee420f0a43f5 Fix typo in doc-string of charset
Kenichi Handa <handa@m17n.org>
parents: 18529
diff changeset
199 (setq standard-character-unification-table-for-decode
17760
b3d62674b210 Delete code for alternate-charset-table.
Kenichi Handa <handa@m17n.org>
parents: 17541
diff changeset
200 (make-unification-table
b3d62674b210 Delete code for alternate-charset-table.
Kenichi Handa <handa@m17n.org>
parents: 17541
diff changeset
201 (list (cons (make-char 'japanese-jisx0208-1978)
b3d62674b210 Delete code for alternate-charset-table.
Kenichi Handa <handa@m17n.org>
parents: 17541
diff changeset
202 (make-char 'japanese-jisx0208))
b3d62674b210 Delete code for alternate-charset-table.
Kenichi Handa <handa@m17n.org>
parents: 17541
diff changeset
203 (cons (make-char 'latin-jisx0201) (make-char 'ascii)))))
b3d62674b210 Delete code for alternate-charset-table.
Kenichi Handa <handa@m17n.org>
parents: 17541
diff changeset
204
18560
ee420f0a43f5 Fix typo in doc-string of charset
Kenichi Handa <handa@m17n.org>
parents: 18529
diff changeset
205 (setq standard-character-unification-table-for-encode nil)
17760
b3d62674b210 Delete code for alternate-charset-table.
Kenichi Handa <handa@m17n.org>
parents: 17541
diff changeset
206
b3d62674b210 Delete code for alternate-charset-table.
Kenichi Handa <handa@m17n.org>
parents: 17541
diff changeset
207
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
208 ;;; Make fundamental coding systems.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
209
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
210 ;; Miscellaneous coding systems which can't be made by
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
211 ;; `make-coding-system'.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
212
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
213 (put 'no-conversion 'coding-system
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
214 (vector nil ?= "Do no conversion" nil nil))
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
215 (put 'no-conversion 'eol-type 0)
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
216
18529
8e293f1a19a9 (binary): Define as coding system alias.
Richard M. Stallman <rms@gnu.org>
parents: 18519
diff changeset
217 (define-coding-system-alias 'binary 'no-conversion)
8e293f1a19a9 (binary): Define as coding system alias.
Richard M. Stallman <rms@gnu.org>
parents: 18519
diff changeset
218
17839
b4a81f70d905 Coding system names changed as follows:
Kenichi Handa <handa@m17n.org>
parents: 17760
diff changeset
219 (put 'undecided-unix 'coding-system 'undecided)
b4a81f70d905 Coding system names changed as follows:
Kenichi Handa <handa@m17n.org>
parents: 17760
diff changeset
220 (put 'undecided-unix 'eol-type 0)
18196
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
221 (put 'undecided-unix 'eol-variant t)
17839
b4a81f70d905 Coding system names changed as follows:
Kenichi Handa <handa@m17n.org>
parents: 17760
diff changeset
222 (put 'undecided-dos 'coding-system 'undecided)
b4a81f70d905 Coding system names changed as follows:
Kenichi Handa <handa@m17n.org>
parents: 17760
diff changeset
223 (put 'undecided-dos 'eol-type 1)
18196
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
224 (put 'undecided-dos 'eol-variant t)
17839
b4a81f70d905 Coding system names changed as follows:
Kenichi Handa <handa@m17n.org>
parents: 17760
diff changeset
225 (put 'undecided-mac 'coding-system 'undecided)
b4a81f70d905 Coding system names changed as follows:
Kenichi Handa <handa@m17n.org>
parents: 17760
diff changeset
226 (put 'undecided-mac 'eol-type 2)
18196
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
227 (put 'undecided-mac 'eol-variant t)
17839
b4a81f70d905 Coding system names changed as follows:
Kenichi Handa <handa@m17n.org>
parents: 17760
diff changeset
228 (put 'undecided 'coding-system
18663
8b53028950ae (undecided): Use `-' in mode line.
Richard M. Stallman <rms@gnu.org>
parents: 18560
diff changeset
229 (vector t ?- "No conversion on encoding, automatic conversion on decoding"
18196
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
230 nil nil))
17839
b4a81f70d905 Coding system names changed as follows:
Kenichi Handa <handa@m17n.org>
parents: 17760
diff changeset
231 (put 'undecided 'eol-type
b4a81f70d905 Coding system names changed as follows:
Kenichi Handa <handa@m17n.org>
parents: 17760
diff changeset
232 (vector 'undecided-unix
b4a81f70d905 Coding system names changed as follows:
Kenichi Handa <handa@m17n.org>
parents: 17760
diff changeset
233 'undecided-dos
b4a81f70d905 Coding system names changed as follows:
Kenichi Handa <handa@m17n.org>
parents: 17760
diff changeset
234 'undecided-mac))
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
235
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
236 ;; Coding systems not specific to each language environment.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
237
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
238 (make-coding-system
17839
b4a81f70d905 Coding system names changed as follows:
Kenichi Handa <handa@m17n.org>
parents: 17760
diff changeset
239 'emacs-mule 0 ?=
18196
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
240 "Emacs internal format used in buffer and string")
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
241
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
242 (make-coding-system
18196
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
243 'iso-2022-7bit 2 ?J
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
244 "ISO 2022 based 7-bit encoding using only G0"
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
245 '((ascii t) nil nil nil
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
246 short ascii-eol ascii-cntl seven))
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
247
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
248 (make-coding-system
18302
6fbbef4e6c39 Change mnemonic letters for iso-2022-7bit-ss2 and
Kenichi Handa <handa@m17n.org>
parents: 18196
diff changeset
249 'iso-2022-7bit-ss2 2 ?$
18196
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
250 "ISO 2022 based 7-bit encoding using SS2 for 96-charset"
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
251 '((ascii t) nil t nil
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
252 short ascii-eol ascii-cntl seven nil single-shift))
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
253
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
254 (make-coding-system
18302
6fbbef4e6c39 Change mnemonic letters for iso-2022-7bit-ss2 and
Kenichi Handa <handa@m17n.org>
parents: 18196
diff changeset
255 'iso-2022-7bit-lock 2 ?&
18196
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
256 "ISO-2022 coding system using Locking-Shift for 96-charset"
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
257 '((ascii t) t nil nil
18302
6fbbef4e6c39 Change mnemonic letters for iso-2022-7bit-ss2 and
Kenichi Handa <handa@m17n.org>
parents: 18196
diff changeset
258 nil ascii-eol ascii-cntl seven locking-shift))
18196
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
259
18519
b6badf3614ea Fix calls to define-coding-system-alias.
Richard M. Stallman <rms@gnu.org>
parents: 18377
diff changeset
260 (define-coding-system-alias 'iso-2022-int-1 'iso-2022-7bit-lock)
18196
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
261
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
262 (make-coding-system
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
263 'iso-2022-7bit-lock-ss2 2 ?i
17091
06d52b56fdd5 Add INIT-BOL to coding system iso-2022-cjk.
Kenichi Handa <handa@m17n.org>
parents: 17070
diff changeset
264 "Mixture of ISO-2022-JP, ISO-2022-KR, and ISO-2022-CN"
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
265 '((ascii t)
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
266 (nil korean-ksc5601 chinese-gb2312 chinese-cns11643-1 t)
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
267 (nil chinese-cns11643-2)
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
268 (nil chinese-cns11643-3 chinese-cns11643-4 chinese-cns11643-5
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
269 chinese-cns11643-6 chinese-cns11643-7)
17091
06d52b56fdd5 Add INIT-BOL to coding system iso-2022-cjk.
Kenichi Handa <handa@m17n.org>
parents: 17070
diff changeset
270 short ascii-eol ascii-cntl seven locking-shift single-shift nil nil nil
06d52b56fdd5 Add INIT-BOL to coding system iso-2022-cjk.
Kenichi Handa <handa@m17n.org>
parents: 17070
diff changeset
271 init-bol))
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
272
18519
b6badf3614ea Fix calls to define-coding-system-alias.
Richard M. Stallman <rms@gnu.org>
parents: 18377
diff changeset
273 (define-coding-system-alias 'iso-2022-cjk 'iso-2022-7bit-lock-ss2)
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
274
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
275 (make-coding-system
18196
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
276 'iso-2022-8bit-ss2 2 ?@
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
277 "ISO 2022 based 8-bit encoding using SS2 for 96-charset"
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
278 '((ascii t) nil t nil
18196
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
279 nil ascii-eol ascii-cntl nil nil single-shift))
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
280
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
281 ;; The other coding-systems are defined in each language specific
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
282 ;; section of languages.el.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
283
18196
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
284 ;; Setting coding system `undecided' for reading any files. Though,
17839
b4a81f70d905 Coding system names changed as follows:
Kenichi Handa <handa@m17n.org>
parents: 17760
diff changeset
285 ;; compiled Emacs Lisp files (*.elc) should never be decoded nor
b4a81f70d905 Coding system names changed as follows:
Kenichi Handa <handa@m17n.org>
parents: 17760
diff changeset
286 ;; encoded.
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
287
18196
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
288 (setq file-coding-system-alist
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
289 '(("\\.elc$" . (no-conversion . no-conversion))
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
290 ("loaddefs.el$" . (no-conversion . no-conversion))
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
291 ("" . (undecided . nil))))
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
292
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
293
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
294 ;;; Setting coding categories and their priorities.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
295
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
296 ;; This setting is just to read an Emacs Lisp source files which
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
297 ;; contain multilingual text while dumping Emacs. More appropriate
18302
6fbbef4e6c39 Change mnemonic letters for iso-2022-7bit-ss2 and
Kenichi Handa <handa@m17n.org>
parents: 18196
diff changeset
298 ;; values are set by the command `set-language-environment' for each
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
299 ;; language environment.
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
300
17839
b4a81f70d905 Coding system names changed as follows:
Kenichi Handa <handa@m17n.org>
parents: 17760
diff changeset
301 (setq coding-category-emacs-mule 'emacs-mule
18196
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
302 coding-category-sjis 'japanese-shift-jis
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
303 coding-category-iso-7 'iso-2022-7bit
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
304 coding-category-iso-8-1 'iso-latin-1
18302
6fbbef4e6c39 Change mnemonic letters for iso-2022-7bit-ss2 and
Kenichi Handa <handa@m17n.org>
parents: 18196
diff changeset
305 coding-category-iso-8-2 'japanese-iso-8bit
18196
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
306 coding-category-iso-else 'iso-2022-7bit-lock
85354a726fa5 Coding system names changed.
Kenichi Handa <handa@m17n.org>
parents: 17992
diff changeset
307 coding-category-big5 'chinese-big5
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
308 coding-category-binary 'no-conversion)
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
309
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
310 (set-coding-priority
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
311 '(coding-category-iso-7
17541
181fe440fcc8 Re-arrange priorities of coding categories.
Kenichi Handa <handa@m17n.org>
parents: 17293
diff changeset
312 coding-category-iso-8-1
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
313 coding-category-iso-8-2
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
314 coding-category-iso-else
17992
191bef5a0922 Set default value of coding-category-iso-else to
Kenichi Handa <handa@m17n.org>
parents: 17839
diff changeset
315 coding-category-emacs-mule
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
316 coding-category-sjis
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
317 coding-category-big5
17992
191bef5a0922 Set default value of coding-category-iso-else to
Kenichi Handa <handa@m17n.org>
parents: 17839
diff changeset
318 coding-category-binary))
17070
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
319
616c024f4e84 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
320 ;;; mule-conf.el ends here