aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman2001-12-28 22:27:37 +0000
committerRichard M. Stallman2001-12-28 22:27:37 +0000
commita929f9e85dc1d26d7e98f24ecd944bf2e437a8e4 (patch)
treeab1141e8c08fd36dd27ca046af57b0832afc8142
parent74e1934a3b7af912a6be36755149cee228775c89 (diff)
downloademacs-a929f9e85dc1d26d7e98f24ecd944bf2e437a8e4.tar.gz
emacs-a929f9e85dc1d26d7e98f24ecd944bf2e437a8e4.zip
(iso-transl-char-map) Eliminate the
alias symbols--put the translated sequences here directly.
Diffstat
-rw-r--r--lisp/international/iso-transl.el335
1 files changed, 119 insertions, 216 deletions
diff --git a/lisp/international/iso-transl.el b/lisp/international/iso-transl.el
index f3a0cd8ed0c..cd5151c82ae 100644
--- a/lisp/international/iso-transl.el
+++ b/lisp/international/iso-transl.el
@@ -79,125 +79,125 @@
79;; writing the translation directly here. 79;; writing the translation directly here.
80;; That is for the sake of C-x 8 C-h. 80;; That is for the sake of C-x 8 C-h.
81(defvar iso-transl-char-map 81(defvar iso-transl-char-map
82 '(("* " . iso-transl-no-break-space) 82 '(("* " . [? ])
83 (" " . iso-transl-no-break-space) 83 (" " . [? ])
84 ("*!" . iso-transl-inverted-exclamation-mark) 84 ("*!" . [?¡])
85 ("!" . iso-transl-inverted-exclamation-mark) 85 ("!" . [?¡])
86 ("\"\"" . iso-transl-diaeresis) 86 ("\"\"" . [?¨])
87 ("\"A" . iso-transl-A-umlaut) 87 ("\"A" . [?Ä])
88 ("\"E" . iso-transl-E-umlaut) 88 ("\"E" . [?Ë])
89 ("\"I" . iso-transl-I-umlaut) 89 ("\"I" . [?Ï])
90 ("\"O" . iso-transl-O-umlaut) 90 ("\"O" . [?Ö])
91 ("\"U" . iso-transl-U-umlaut) 91 ("\"U" . [?Ü])
92 ("\"a" . iso-transl-a-umlaut) 92 ("\"a" . [?ä])
93 ("\"e" . iso-transl-e-umlaut) 93 ("\"e" . [?ë])
94 ("\"i" . iso-transl-i-umlaut) 94 ("\"i" . [?ï])
95 ("\"o" . iso-transl-o-umlaut) 95 ("\"o" . [?ö])
96 ("\"s" . iso-transl-ss) 96 ("\"s" . [?ß])
97 ("\"u" . iso-transl-u-umlaut) 97 ("\"u" . [?ü])
98 ("\"y" . iso-transl-y-umlaut) 98 ("\"y" . [?ÿ])
99 ("''" . iso-transl-acute-accent) 99 ("''" . [?´])
100 ("'A" . iso-transl-A-acute) 100 ("'A" . [?Á])
101 ("'E" . iso-transl-E-acute) 101 ("'E" . [?É])
102 ("'I" . iso-transl-I-acute) 102 ("'I" . [?Í])
103 ("'O" . iso-transl-O-acute) 103 ("'O" . [?Ó])
104 ("'U" . iso-transl-U-acute) 104 ("'U" . [?Ú])
105 ("'Y" . iso-transl-Y-acute) 105 ("'Y" . [?Ý])
106 ("'a" . iso-transl-a-acute) 106 ("'a" . [?á])
107 ("'e" . iso-transl-e-acute) 107 ("'e" . [?é])
108 ("'i" . iso-transl-i-acute) 108 ("'i" . [?í])
109 ("'o" . iso-transl-o-acute) 109 ("'o" . [?ó])
110 ("'u" . iso-transl-u-acute) 110 ("'u" . [?ú])
111 ("'y" . iso-transl-y-acute) 111 ("'y" . [?ý])
112 ("*$" . iso-transl-general-currency-sign) 112 ("*$" . [?¤])
113 ("$" . iso-transl-general-currency-sign) 113 ("$" . [?¤])
114 ("*+" . iso-transl-plus-or-minus-sign) 114 ("*+" . [?±])
115 ("+" . iso-transl-plus-or-minus-sign) 115 ("+" . [?±])
116 (",," . iso-transl-cedilla) 116 (",," . [?¸])
117 (",C" . iso-transl-C-cedilla) 117 (",C" . [?Ç])
118 (",c" . iso-transl-c-cedilla) 118 (",c" . [?ç])
119 ("*-" . iso-transl-soft-hyphen) 119 ("*-" . [?­])
120 ("-" . iso-transl-soft-hyphen) 120 ("-" . [?­])
121 ("*." . iso-transl-middle-dot) 121 ("*." . [?·])
122 ("." . iso-transl-middle-dot) 122 ("." . [?·])
123 ("//" . iso-transl-division-sign) 123 ("//" . [?÷])
124 ("/A" . iso-transl-A-ring) 124 ("/A" . [?Å])
125 ("/E" . iso-transl-AE) 125 ("/E" . [?Æ])
126 ("/O" . iso-transl-O-slash) 126 ("/O" . [?Ø])
127 ("/a" . iso-transl-a-ring) 127 ("/a" . [?å])
128 ("/e" . iso-transl-ae) 128 ("/e" . [?æ])
129 ("/o" . iso-transl-o-slash) 129 ("/o" . [?ø])
130 ("1/2" . iso-transl-one-half) 130 ("1/2" . [?½])
131 ("1/4" . iso-transl-one-quarter) 131 ("1/4" . [?¼])
132 ("3/4" . iso-transl-three-quarters) 132 ("3/4" . [?¾])
133 ("*<" . iso-transl-angle-left) 133 ("*<" . [?«])
134 ("<" . iso-transl-angle-left) 134 ("<" . [?«])
135 ("*=" . iso-transl-macron) 135 ("*=" . [?¯])
136 ("=" . iso-transl-macron) 136 ("=" . [?¯])
137 ("*>" . iso-transl-angle-right) 137 ("*>" . [?»])
138 (">" . iso-transl-angle-right) 138 (">" . [?»])
139 ("*?" . iso-transl-inverted-question-mark) 139 ("*?" . [?¿])
140 ("?" . iso-transl-inverted-question-mark) 140 ("?" . [?¿])
141 ("*C" . iso-transl-copyright-sign) 141 ("*C" . [?©])
142 ("C" . iso-transl-copyright-sign) 142 ("C" . [?©])
143 ("*L" . iso-transl-pound-sign) 143 ("*L" . [?£])
144 ("L" . iso-transl-pound-sign) 144 ("L" . [?£])
145 ("*P" . iso-transl-pilcrow) 145 ("*P" . [?¶])
146 ("P" . iso-transl-pilcrow) 146 ("P" . [?¶])
147 ("*R" . iso-transl-registered-sign) 147 ("*R" . [?®])
148 ("R" . iso-transl-registered-sign) 148 ("R" . [?®])
149 ("*S" . iso-transl-section-sign) 149 ("*S" . [?§])
150 ("S" . iso-transl-section-sign) 150 ("S" . [?§])
151 ("*Y" . iso-transl-yen-sign) 151 ("*Y" . [?¥])
152 ("Y" . iso-transl-yen-sign) 152 ("Y" . [?¥])
153 ("^1" . iso-transl-superscript-1) 153 ("^1" . [?¹])
154 ("^2" . iso-transl-superscript-2) 154 ("^2" . [?²])
155 ("^3" . iso-transl-superscript-3) 155 ("^3" . [?³])
156 ("^A" . iso-transl-A-caret) 156 ("^A" . [?Â])
157 ("^E" . iso-transl-E-caret) 157 ("^E" . [?Ê])
158 ("^I" . iso-transl-I-caret) 158 ("^I" . [?Î])
159 ("^O" . iso-transl-O-caret) 159 ("^O" . [?Ô])
160 ("^U" . iso-transl-U-caret) 160 ("^U" . [?Û])
161 ("^a" . iso-transl-a-caret) 161 ("^a" . [?â])
162 ("^e" . iso-transl-e-caret) 162 ("^e" . [?ê])
163 ("^i" . iso-transl-i-caret) 163 ("^i" . [?î])
164 ("^o" . iso-transl-o-caret) 164 ("^o" . [?ô])
165 ("^u" . iso-transl-u-caret) 165 ("^u" . [?û])
166 ("_a" . iso-transl-ordinal-indicator-feminine) 166 ("_a" . [?ª])
167 ("_o" . iso-transl-ordinal-indicator-masculine) 167 ("_o" . [?º])
168 ("`A" . iso-transl-A-grave) 168 ("`A" . [?À])
169 ("`E" . iso-transl-E-grave) 169 ("`E" . [?È])
170 ("`I" . iso-transl-I-grave) 170 ("`I" . [?Ì])
171 ("`O" . iso-transl-O-grave) 171 ("`O" . [?Ò])
172 ("`U" . iso-transl-U-grave) 172 ("`U" . [?Ù])
173 ("`a" . iso-transl-a-grave) 173 ("`a" . [?à])
174 ("`e" . iso-transl-e-grave) 174 ("`e" . [?è])
175 ("`i" . iso-transl-i-grave) 175 ("`i" . [?ì])
176 ("`o" . iso-transl-o-grave) 176 ("`o" . [?ò])
177 ("`u" . iso-transl-u-grave) 177 ("`u" . [?ù])
178 ("*c" . iso-transl-cent-sign) 178 ("*c" . [?¢])
179 ("c" . iso-transl-cent-sign) 179 ("c" . [?¢])
180 ("*o" . iso-transl-degree-sign) 180 ("*o" . [?°])
181 ("o" . iso-transl-degree-sign) 181 ("o" . [?°])
182 ("*u" . iso-transl-micro-sign) 182 ("*u" . [?µ])
183 ("u" . iso-transl-micro-sign) 183 ("u" . [?µ])
184 ("*m" . iso-transl-micro-sign) 184 ("*m" . [?µ])
185 ("m" . iso-transl-micro-sign) 185 ("m" . [?µ])
186 ("*x" . iso-transl-multiplication-sign) 186 ("*x" . [?×])
187 ("x" . iso-transl-multiplication-sign) 187 ("x" . [?×])
188 ("*|" . iso-transl-broken-vertical-line) 188 ("*|" . [?¦])
189 ("|" . iso-transl-broken-vertical-line) 189 ("|" . [?¦])
190 ("~A" . iso-transl-A-tilde) 190 ("~A" . [?Ã])
191 ("~D" . iso-transl-D-stroke) 191 ("~D" . [?Ð])
192 ("~N" . iso-transl-N-tilde) 192 ("~N" . [?Ñ])
193 ("~O" . iso-transl-O-tilde) 193 ("~O" . [?Õ])
194 ("~T" . iso-transl-THORN) 194 ("~T" . [?Þ])
195 ("~a" . iso-transl-a-tilde) 195 ("~a" . [?ã])
196 ("~d" . iso-transl-d-stroke) 196 ("~d" . [?ð])
197 ("~n" . iso-transl-n-tilde) 197 ("~n" . [?ñ])
198 ("~o" . iso-transl-o-tilde) 198 ("~o" . [?õ])
199 ("~t" . iso-transl-thorn) 199 ("~t" . [?þ])
200 ("~~" . iso-transl-not-sign) 200 ("~~" . [?¬])
201 ("' " . "'") 201 ("' " . "'")
202 ("` " . "`") 202 ("` " . "`")
203 ("\" " . "\"") 203 ("\" " . "\"")
@@ -208,103 +208,6 @@ Each element has the form (STRING . VECTOR).
208The sequence STRING of ASCII chars translates into the 208The sequence STRING of ASCII chars translates into the
209sequence VECTOR. (VECTOR is normally one character long.)") 209sequence VECTOR. (VECTOR is normally one character long.)")
210 210
211(defalias 'iso-transl-no-break-space [? ])
212(defalias 'iso-transl-inverted-exclamation-mark [?¡])
213(defalias 'iso-transl-cent-sign [?¢])
214(defalias 'iso-transl-pound-sign [?£])
215(defalias 'iso-transl-general-currency-sign [?¤])
216(defalias 'iso-transl-yen-sign [?¥])
217(defalias 'iso-transl-broken-vertical-line [?¦])
218(defalias 'iso-transl-section-sign [?§])
219(defalias 'iso-transl-diaeresis [?¨])
220(defalias 'iso-transl-copyright-sign [?©])
221(defalias 'iso-transl-ordinal-indicator-feminine [?ª])
222(defalias 'iso-transl-angle-left [?«])
223(defalias 'iso-transl-not-sign [?¬])
224(defalias 'iso-transl-soft-hyphen [?­])
225(defalias 'iso-transl-registered-sign [?®])
226(defalias 'iso-transl-macron [?¯])
227(defalias 'iso-transl-degree-sign [?°])
228(defalias 'iso-transl-plus-or-minus-sign [?±])
229(defalias 'iso-transl-superscript-2 [?²])
230(defalias 'iso-transl-superscript-3 [?³])
231(defalias 'iso-transl-acute-accent [?´])
232(defalias 'iso-transl-micro-sign [?µ])
233(defalias 'iso-transl-pilcrow [?¶])
234(defalias 'iso-transl-middle-dot [?·])
235(defalias 'iso-transl-cedilla [?¸])
236(defalias 'iso-transl-superscript-1 [?¹])
237(defalias 'iso-transl-ordinal-indicator-masculine [?º])
238(defalias 'iso-transl-angle-right [?»])
239(defalias 'iso-transl-one-quarter [?¼])
240(defalias 'iso-transl-one-half [?½])
241(defalias 'iso-transl-three-quarters [?¾])
242(defalias 'iso-transl-inverted-question-mark [?¿])
243(defalias 'iso-transl-A-grave [?À])
244(defalias 'iso-transl-A-acute [?Á])
245(defalias 'iso-transl-A-caret [?Â])
246(defalias 'iso-transl-A-tilde [?Ã])
247(defalias 'iso-transl-A-umlaut [?Ä])
248(defalias 'iso-transl-A-ring [?Å])
249(defalias 'iso-transl-AE [?Æ])
250(defalias 'iso-transl-C-cedilla [?Ç])
251(defalias 'iso-transl-E-grave [?È])
252(defalias 'iso-transl-E-acute [?É])
253(defalias 'iso-transl-E-caret [?Ê])
254(defalias 'iso-transl-E-umlaut [?Ë])
255(defalias 'iso-transl-I-grave [?Ì])
256(defalias 'iso-transl-I-acute [?Í])
257(defalias 'iso-transl-I-caret [?Î])
258(defalias 'iso-transl-I-umlaut [?Ï])
259(defalias 'iso-transl-D-stroke [?Ð])
260(defalias 'iso-transl-N-tilde [?Ñ])
261(defalias 'iso-transl-O-grave [?Ò])
262(defalias 'iso-transl-O-acute [?Ó])
263(defalias 'iso-transl-O-caret [?Ô])
264(defalias 'iso-transl-O-tilde [?Õ])
265(defalias 'iso-transl-O-umlaut [?Ö])
266(defalias 'iso-transl-multiplication-sign [?×])
267(defalias 'iso-transl-O-slash [?Ø])
268(defalias 'iso-transl-U-grave [?Ù])
269(defalias 'iso-transl-U-acute [?Ú])
270(defalias 'iso-transl-U-caret [?Û])
271(defalias 'iso-transl-U-umlaut [?Ü])
272(defalias 'iso-transl-Y-acute [?Ý])
273(defalias 'iso-transl-THORN [?Þ])
274(defalias 'iso-transl-ss [?ß])
275(defalias 'iso-transl-a-grave [?à])
276(defalias 'iso-transl-a-acute [?á])
277(defalias 'iso-transl-a-caret [?â])
278(defalias 'iso-transl-a-tilde [?ã])
279(defalias 'iso-transl-a-umlaut [?ä])
280(defalias 'iso-transl-a-ring [?å])
281(defalias 'iso-transl-ae [?æ])
282(defalias 'iso-transl-c-cedilla [?ç])
283(defalias 'iso-transl-e-grave [?è])
284(defalias 'iso-transl-e-acute [?é])
285(defalias 'iso-transl-e-caret [?ê])
286(defalias 'iso-transl-e-umlaut [?ë])
287(defalias 'iso-transl-i-grave [?ì])
288(defalias 'iso-transl-i-acute [?í])
289(defalias 'iso-transl-i-caret [?î])
290(defalias 'iso-transl-i-umlaut [?ï])
291(defalias 'iso-transl-d-stroke [?ð])
292(defalias 'iso-transl-n-tilde [?ñ])
293(defalias 'iso-transl-o-grave [?ò])
294(defalias 'iso-transl-o-acute [?ó])
295(defalias 'iso-transl-o-caret [?ô])
296(defalias 'iso-transl-o-tilde [?õ])
297(defalias 'iso-transl-o-umlaut [?ö])
298(defalias 'iso-transl-division-sign [?÷])
299(defalias 'iso-transl-o-slash [?ø])
300(defalias 'iso-transl-u-grave [?ù])
301(defalias 'iso-transl-u-acute [?ú])
302(defalias 'iso-transl-u-caret [?û])
303(defalias 'iso-transl-u-umlaut [?ü])
304(defalias 'iso-transl-y-acute [?ý])
305(defalias 'iso-transl-thorn [?þ])
306(defalias 'iso-transl-y-umlaut [?ÿ])
307
308;; Language-specific translation lists. 211;; Language-specific translation lists.
309(defvar iso-transl-language-alist 212(defvar iso-transl-language-alist
310 '(("Esperanto" 213 '(("Esperanto"
generated by cgit v1.2.1 (git 2.18.0) at 2026-01-25 23:10:53 +0000