1 |
;;; iso-transl.el --- keyboard input definitions for ISO 8859/1. |
;;; iso-transl.el --- keyboard input definitions for ISO 8859-1 -*- coding: iso-8859-1 -*- |
2 |
|
|
3 |
;; Copyright (C) 1987, 1993, 1994, 1995 Free Software Foundation, Inc. |
;; Copyright (C) 1987, 1993, 1994, 1995, 2001 Free Software Foundation, Inc. |
4 |
|
|
5 |
;; Author: Howard Gayle |
;; Author: Howard Gayle |
6 |
;; Maintainer: FSF |
;; Maintainer: FSF |
208 |
The sequence STRING of ASCII chars translates into the |
The sequence STRING of ASCII chars translates into the |
209 |
sequence VECTOR. (VECTOR is normally one character long.)") |
sequence VECTOR. (VECTOR is normally one character long.)") |
210 |
|
|
211 |
(defalias 'iso-transl-no-break-space [160]) |
(defalias 'iso-transl-no-break-space [? ]) |
212 |
(defalias 'iso-transl-inverted-exclamation-mark [161]) |
(defalias 'iso-transl-inverted-exclamation-mark [?¡]) |
213 |
(defalias 'iso-transl-cent-sign [162]) |
(defalias 'iso-transl-cent-sign [?¢]) |
214 |
(defalias 'iso-transl-pound-sign [163]) |
(defalias 'iso-transl-pound-sign [?£]) |
215 |
(defalias 'iso-transl-general-currency-sign [164]) |
(defalias 'iso-transl-general-currency-sign [?¤]) |
216 |
(defalias 'iso-transl-yen-sign [165]) |
(defalias 'iso-transl-yen-sign [?¥]) |
217 |
(defalias 'iso-transl-broken-vertical-line [166]) |
(defalias 'iso-transl-broken-vertical-line [?¦]) |
218 |
(defalias 'iso-transl-section-sign [167]) |
(defalias 'iso-transl-section-sign [?§]) |
219 |
(defalias 'iso-transl-diaeresis [168]) |
(defalias 'iso-transl-diaeresis [?¨]) |
220 |
(defalias 'iso-transl-copyright-sign [169]) |
(defalias 'iso-transl-copyright-sign [?©]) |
221 |
(defalias 'iso-transl-ordinal-indicator-feminine [170]) |
(defalias 'iso-transl-ordinal-indicator-feminine [?ª]) |
222 |
(defalias 'iso-transl-angle-left [171]) |
(defalias 'iso-transl-angle-left [?«]) |
223 |
(defalias 'iso-transl-not-sign [172]) |
(defalias 'iso-transl-not-sign [?¬]) |
224 |
(defalias 'iso-transl-soft-hyphen [173]) |
(defalias 'iso-transl-soft-hyphen [?]) |
225 |
(defalias 'iso-transl-registered-sign [174]) |
(defalias 'iso-transl-registered-sign [?®]) |
226 |
(defalias 'iso-transl-macron [175]) |
(defalias 'iso-transl-macron [?¯]) |
227 |
(defalias 'iso-transl-degree-sign [176]) |
(defalias 'iso-transl-degree-sign [?°]) |
228 |
(defalias 'iso-transl-plus-or-minus-sign [177]) |
(defalias 'iso-transl-plus-or-minus-sign [?±]) |
229 |
(defalias 'iso-transl-superscript-2 [178]) |
(defalias 'iso-transl-superscript-2 [?²]) |
230 |
(defalias 'iso-transl-superscript-3 [179]) |
(defalias 'iso-transl-superscript-3 [?³]) |
231 |
(defalias 'iso-transl-acute-accent [180]) |
(defalias 'iso-transl-acute-accent [?´]) |
232 |
(defalias 'iso-transl-micro-sign [181]) |
(defalias 'iso-transl-micro-sign [?µ]) |
233 |
(defalias 'iso-transl-pilcrow [182]) |
(defalias 'iso-transl-pilcrow [?¶]) |
234 |
(defalias 'iso-transl-middle-dot [183]) |
(defalias 'iso-transl-middle-dot [?·]) |
235 |
(defalias 'iso-transl-cedilla [184]) |
(defalias 'iso-transl-cedilla [?¸]) |
236 |
(defalias 'iso-transl-superscript-1 [185]) |
(defalias 'iso-transl-superscript-1 [?¹]) |
237 |
(defalias 'iso-transl-ordinal-indicator-masculine [186]) |
(defalias 'iso-transl-ordinal-indicator-masculine [?º]) |
238 |
(defalias 'iso-transl-angle-right [187]) |
(defalias 'iso-transl-angle-right [?»]) |
239 |
(defalias 'iso-transl-one-quarter [188]) |
(defalias 'iso-transl-one-quarter [?¼]) |
240 |
(defalias 'iso-transl-one-half [189]) |
(defalias 'iso-transl-one-half [?½]) |
241 |
(defalias 'iso-transl-three-quarters [190]) |
(defalias 'iso-transl-three-quarters [?¾]) |
242 |
(defalias 'iso-transl-inverted-question-mark [191]) |
(defalias 'iso-transl-inverted-question-mark [?¿]) |
243 |
(defalias 'iso-transl-A-grave [192]) |
(defalias 'iso-transl-A-grave [?À]) |
244 |
(defalias 'iso-transl-A-acute [193]) |
(defalias 'iso-transl-A-acute [?Á]) |
245 |
(defalias 'iso-transl-A-caret [194]) |
(defalias 'iso-transl-A-caret [?Â]) |
246 |
(defalias 'iso-transl-A-tilde [195]) |
(defalias 'iso-transl-A-tilde [?Ã]) |
247 |
(defalias 'iso-transl-A-umlaut [196]) |
(defalias 'iso-transl-A-umlaut [?Ä]) |
248 |
(defalias 'iso-transl-A-ring [197]) |
(defalias 'iso-transl-A-ring [?Å]) |
249 |
(defalias 'iso-transl-AE [198]) |
(defalias 'iso-transl-AE [?Æ]) |
250 |
(defalias 'iso-transl-C-cedilla [199]) |
(defalias 'iso-transl-C-cedilla [?Ç]) |
251 |
(defalias 'iso-transl-E-grave [200]) |
(defalias 'iso-transl-E-grave [?È]) |
252 |
(defalias 'iso-transl-E-acute [201]) |
(defalias 'iso-transl-E-acute [?É]) |
253 |
(defalias 'iso-transl-E-caret [202]) |
(defalias 'iso-transl-E-caret [?Ê]) |
254 |
(defalias 'iso-transl-E-umlaut [203]) |
(defalias 'iso-transl-E-umlaut [?Ë]) |
255 |
(defalias 'iso-transl-I-grave [204]) |
(defalias 'iso-transl-I-grave [?Ì]) |
256 |
(defalias 'iso-transl-I-acute [205]) |
(defalias 'iso-transl-I-acute [?Í]) |
257 |
(defalias 'iso-transl-I-caret [206]) |
(defalias 'iso-transl-I-caret [?Î]) |
258 |
(defalias 'iso-transl-I-umlaut [207]) |
(defalias 'iso-transl-I-umlaut [?Ï]) |
259 |
(defalias 'iso-transl-D-stroke [208]) |
(defalias 'iso-transl-D-stroke [?Ð]) |
260 |
(defalias 'iso-transl-N-tilde [209]) |
(defalias 'iso-transl-N-tilde [?Ñ]) |
261 |
(defalias 'iso-transl-O-grave [210]) |
(defalias 'iso-transl-O-grave [?Ò]) |
262 |
(defalias 'iso-transl-O-acute [211]) |
(defalias 'iso-transl-O-acute [?Ó]) |
263 |
(defalias 'iso-transl-O-caret [212]) |
(defalias 'iso-transl-O-caret [?Ô]) |
264 |
(defalias 'iso-transl-O-tilde [213]) |
(defalias 'iso-transl-O-tilde [?Õ]) |
265 |
(defalias 'iso-transl-O-umlaut [214]) |
(defalias 'iso-transl-O-umlaut [?Ö]) |
266 |
(defalias 'iso-transl-multiplication-sign [215]) |
(defalias 'iso-transl-multiplication-sign [?×]) |
267 |
(defalias 'iso-transl-O-slash [216]) |
(defalias 'iso-transl-O-slash [?Ø]) |
268 |
(defalias 'iso-transl-U-grave [217]) |
(defalias 'iso-transl-U-grave [?Ù]) |
269 |
(defalias 'iso-transl-U-acute [218]) |
(defalias 'iso-transl-U-acute [?Ú]) |
270 |
(defalias 'iso-transl-U-caret [219]) |
(defalias 'iso-transl-U-caret [?Û]) |
271 |
(defalias 'iso-transl-U-umlaut [220]) |
(defalias 'iso-transl-U-umlaut [?Ü]) |
272 |
(defalias 'iso-transl-Y-acute [221]) |
(defalias 'iso-transl-Y-acute [?Ý]) |
273 |
(defalias 'iso-transl-THORN [222]) |
(defalias 'iso-transl-THORN [?Þ]) |
274 |
(defalias 'iso-transl-ss [223]) |
(defalias 'iso-transl-ss [?ß]) |
275 |
(defalias 'iso-transl-a-grave [224]) |
(defalias 'iso-transl-a-grave [?à]) |
276 |
(defalias 'iso-transl-a-acute [225]) |
(defalias 'iso-transl-a-acute [?á]) |
277 |
(defalias 'iso-transl-a-caret [226]) |
(defalias 'iso-transl-a-caret [?â]) |
278 |
(defalias 'iso-transl-a-tilde [227]) |
(defalias 'iso-transl-a-tilde [?ã]) |
279 |
(defalias 'iso-transl-a-umlaut [228]) |
(defalias 'iso-transl-a-umlaut [?ä]) |
280 |
(defalias 'iso-transl-a-ring [229]) |
(defalias 'iso-transl-a-ring [?å]) |
281 |
(defalias 'iso-transl-ae [230]) |
(defalias 'iso-transl-ae [?æ]) |
282 |
(defalias 'iso-transl-c-cedilla [231]) |
(defalias 'iso-transl-c-cedilla [?ç]) |
283 |
(defalias 'iso-transl-e-grave [232]) |
(defalias 'iso-transl-e-grave [?è]) |
284 |
(defalias 'iso-transl-e-acute [233]) |
(defalias 'iso-transl-e-acute [?é]) |
285 |
(defalias 'iso-transl-E-caret [234]) |
(defalias 'iso-transl-e-caret [?ê]) |
286 |
(defalias 'iso-transl-e-umlaut [235]) |
(defalias 'iso-transl-e-umlaut [?ë]) |
287 |
(defalias 'iso-transl-i-grave [236]) |
(defalias 'iso-transl-i-grave [?ì]) |
288 |
(defalias 'iso-transl-i-acute [237]) |
(defalias 'iso-transl-i-acute [?í]) |
289 |
(defalias 'iso-transl-I-caret [238]) |
(defalias 'iso-transl-i-caret [?î]) |
290 |
(defalias 'iso-transl-i-umlaut [239]) |
(defalias 'iso-transl-i-umlaut [?ï]) |
291 |
(defalias 'iso-transl-d-stroke [240]) |
(defalias 'iso-transl-d-stroke [?ð]) |
292 |
(defalias 'iso-transl-n-tilde [241]) |
(defalias 'iso-transl-n-tilde [?ñ]) |
293 |
(defalias 'iso-transl-o-grave [242]) |
(defalias 'iso-transl-o-grave [?ò]) |
294 |
(defalias 'iso-transl-o-acute [243]) |
(defalias 'iso-transl-o-acute [?ó]) |
295 |
(defalias 'iso-transl-O-caret [244]) |
(defalias 'iso-transl-o-caret [?ô]) |
296 |
(defalias 'iso-transl-o-tilde [245]) |
(defalias 'iso-transl-o-tilde [?õ]) |
297 |
(defalias 'iso-transl-o-umlaut [246]) |
(defalias 'iso-transl-o-umlaut [?ö]) |
298 |
(defalias 'iso-transl-division-sign [247]) |
(defalias 'iso-transl-division-sign [?÷]) |
299 |
(defalias 'iso-transl-o-slash [248]) |
(defalias 'iso-transl-o-slash [?ø]) |
300 |
(defalias 'iso-transl-u-grave [249]) |
(defalias 'iso-transl-u-grave [?ù]) |
301 |
(defalias 'iso-transl-u-acute [250]) |
(defalias 'iso-transl-u-acute [?ú]) |
302 |
(defalias 'iso-transl-U-caret [251]) |
(defalias 'iso-transl-u-caret [?û]) |
303 |
(defalias 'iso-transl-u-umlaut [252]) |
(defalias 'iso-transl-u-umlaut [?ü]) |
304 |
(defalias 'iso-transl-y-acute [253]) |
(defalias 'iso-transl-y-acute [?ý]) |
305 |
(defalias 'iso-transl-thorn [254]) |
(defalias 'iso-transl-thorn [?þ]) |
306 |
(defalias 'iso-transl-y-umlaut [255]) |
(defalias 'iso-transl-y-umlaut [?ÿ]) |
307 |
|
|
308 |
;; Language-specific translation lists. |
;; Language-specific translation lists. |
309 |
(defvar iso-transl-language-alist |
(defvar iso-transl-language-alist |
310 |
'(("Esperanto" |
'(("Esperanto" |
311 |
("C" . [198]) |
("C" . [?Æ]) |
312 |
("G" . [216]) |
("G" . [?Ø]) |
313 |
("H" . [166]) |
("H" . [?¦]) |
314 |
("J" . [172]) |
("J" . [?¬]) |
315 |
("S" . [222]) |
("S" . [?Þ]) |
316 |
("U" . [221]) |
("U" . [?Ý]) |
317 |
("c" . [230]) |
("c" . [?æ]) |
318 |
("g" . [248]) |
("g" . [?ø]) |
319 |
("h" . [182]) |
("h" . [?¶]) |
320 |
("j" . [188]) |
("j" . [?¼]) |
321 |
("s" . [254]) |
("s" . [?þ]) |
322 |
("u" . [253])) |
("u" . [?ý])) |
323 |
("French" |
("French" |
324 |
("C" . [199]) |
("C" . [?Ç]) |
325 |
("c" . [231])) |
("c" . [?ç])) |
326 |
("German" |
("German" |
327 |
("A" . [196]) |
("A" . [?Ä]) |
328 |
("O" . [214]) |
("O" . [?Ö]) |
329 |
("U" . [220]) |
("U" . [?Ü]) |
330 |
("a" . [228]) |
("a" . [?ä]) |
331 |
("o" . [246]) |
("o" . [?ö]) |
332 |
("s" . [223]) |
("s" . [?ß]) |
333 |
("u" . [252])) |
("u" . [?ü])) |
334 |
("Portuguese" |
("Portuguese" |
335 |
("C" . [199]) |
("C" . [?Ç]) |
336 |
("c" . [231])) |
("c" . [?ç])) |
337 |
("Spanish" |
("Spanish" |
338 |
("!" . [161]) |
("!" . [?¡]) |
339 |
("?" . [191]) |
("?" . [?¿]) |
340 |
("N" . [209]) |
("N" . [?Ñ]) |
341 |
("n" . [241])))) |
("n" . [?ñ])))) |
342 |
|
|
343 |
(defvar iso-transl-ctl-x-8-map nil |
(defvar iso-transl-ctl-x-8-map nil |
344 |
"Keymap for C-x 8 prefix.") |
"Keymap for C-x 8 prefix.") |