diff options
author | Dave Love <fx@gnu.org> | 2001-12-07 14:56:44 +0000 |
---|---|---|
committer | Dave Love <fx@gnu.org> | 2001-12-07 14:56:44 +0000 |
commit | b9563f072626a0f2a128e49643ff7ccc1320348c (patch) | |
tree | f872804e6af745dbf0135a43bd858b3efef081f1 /lisp/international/iso-transl.el | |
parent | 419afed9bd5f80189a818b3b32f9728e4e2bf0e0 (diff) | |
download | emacs-b9563f072626a0f2a128e49643ff7ccc1320348c.tar.gz |
Insert Latin-1 characters, not
unibyte codes.
Diffstat (limited to 'lisp/international/iso-transl.el')
-rw-r--r-- | lisp/international/iso-transl.el | 248 |
1 files changed, 124 insertions, 124 deletions
diff --git a/lisp/international/iso-transl.el b/lisp/international/iso-transl.el index af32105b20a..f3a0cd8ed0c 100644 --- a/lisp/international/iso-transl.el +++ b/lisp/international/iso-transl.el @@ -1,4 +1,4 @@ -;;; iso-transl.el --- keyboard input definitions for ISO 8859-1 +;;; iso-transl.el --- keyboard input definitions for ISO 8859-1 -*- coding: iso-8859-1 -*- ;; Copyright (C) 1987, 1993, 1994, 1995, 2001 Free Software Foundation, Inc. @@ -208,137 +208,137 @@ Each element has the form (STRING . VECTOR). The sequence STRING of ASCII chars translates into the sequence VECTOR. (VECTOR is normally one character long.)") -(defalias 'iso-transl-no-break-space [160]) -(defalias 'iso-transl-inverted-exclamation-mark [161]) -(defalias 'iso-transl-cent-sign [162]) -(defalias 'iso-transl-pound-sign [163]) -(defalias 'iso-transl-general-currency-sign [164]) -(defalias 'iso-transl-yen-sign [165]) -(defalias 'iso-transl-broken-vertical-line [166]) -(defalias 'iso-transl-section-sign [167]) -(defalias 'iso-transl-diaeresis [168]) -(defalias 'iso-transl-copyright-sign [169]) -(defalias 'iso-transl-ordinal-indicator-feminine [170]) -(defalias 'iso-transl-angle-left [171]) -(defalias 'iso-transl-not-sign [172]) -(defalias 'iso-transl-soft-hyphen [173]) -(defalias 'iso-transl-registered-sign [174]) -(defalias 'iso-transl-macron [175]) -(defalias 'iso-transl-degree-sign [176]) -(defalias 'iso-transl-plus-or-minus-sign [177]) -(defalias 'iso-transl-superscript-2 [178]) -(defalias 'iso-transl-superscript-3 [179]) -(defalias 'iso-transl-acute-accent [180]) -(defalias 'iso-transl-micro-sign [181]) -(defalias 'iso-transl-pilcrow [182]) -(defalias 'iso-transl-middle-dot [183]) -(defalias 'iso-transl-cedilla [184]) -(defalias 'iso-transl-superscript-1 [185]) -(defalias 'iso-transl-ordinal-indicator-masculine [186]) -(defalias 'iso-transl-angle-right [187]) -(defalias 'iso-transl-one-quarter [188]) -(defalias 'iso-transl-one-half [189]) -(defalias 'iso-transl-three-quarters [190]) -(defalias 'iso-transl-inverted-question-mark [191]) -(defalias 'iso-transl-A-grave [192]) -(defalias 'iso-transl-A-acute [193]) -(defalias 'iso-transl-A-caret [194]) -(defalias 'iso-transl-A-tilde [195]) -(defalias 'iso-transl-A-umlaut [196]) -(defalias 'iso-transl-A-ring [197]) -(defalias 'iso-transl-AE [198]) -(defalias 'iso-transl-C-cedilla [199]) -(defalias 'iso-transl-E-grave [200]) -(defalias 'iso-transl-E-acute [201]) -(defalias 'iso-transl-E-caret [202]) -(defalias 'iso-transl-E-umlaut [203]) -(defalias 'iso-transl-I-grave [204]) -(defalias 'iso-transl-I-acute [205]) -(defalias 'iso-transl-I-caret [206]) -(defalias 'iso-transl-I-umlaut [207]) -(defalias 'iso-transl-D-stroke [208]) -(defalias 'iso-transl-N-tilde [209]) -(defalias 'iso-transl-O-grave [210]) -(defalias 'iso-transl-O-acute [211]) -(defalias 'iso-transl-O-caret [212]) -(defalias 'iso-transl-O-tilde [213]) -(defalias 'iso-transl-O-umlaut [214]) -(defalias 'iso-transl-multiplication-sign [215]) -(defalias 'iso-transl-O-slash [216]) -(defalias 'iso-transl-U-grave [217]) -(defalias 'iso-transl-U-acute [218]) -(defalias 'iso-transl-U-caret [219]) -(defalias 'iso-transl-U-umlaut [220]) -(defalias 'iso-transl-Y-acute [221]) -(defalias 'iso-transl-THORN [222]) -(defalias 'iso-transl-ss [223]) -(defalias 'iso-transl-a-grave [224]) -(defalias 'iso-transl-a-acute [225]) -(defalias 'iso-transl-a-caret [226]) -(defalias 'iso-transl-a-tilde [227]) -(defalias 'iso-transl-a-umlaut [228]) -(defalias 'iso-transl-a-ring [229]) -(defalias 'iso-transl-ae [230]) -(defalias 'iso-transl-c-cedilla [231]) -(defalias 'iso-transl-e-grave [232]) -(defalias 'iso-transl-e-acute [233]) -(defalias 'iso-transl-e-caret [234]) -(defalias 'iso-transl-e-umlaut [235]) -(defalias 'iso-transl-i-grave [236]) -(defalias 'iso-transl-i-acute [237]) -(defalias 'iso-transl-i-caret [238]) -(defalias 'iso-transl-i-umlaut [239]) -(defalias 'iso-transl-d-stroke [240]) -(defalias 'iso-transl-n-tilde [241]) -(defalias 'iso-transl-o-grave [242]) -(defalias 'iso-transl-o-acute [243]) -(defalias 'iso-transl-o-caret [244]) -(defalias 'iso-transl-o-tilde [245]) -(defalias 'iso-transl-o-umlaut [246]) -(defalias 'iso-transl-division-sign [247]) -(defalias 'iso-transl-o-slash [248]) -(defalias 'iso-transl-u-grave [249]) -(defalias 'iso-transl-u-acute [250]) -(defalias 'iso-transl-u-caret [251]) -(defalias 'iso-transl-u-umlaut [252]) -(defalias 'iso-transl-y-acute [253]) -(defalias 'iso-transl-thorn [254]) -(defalias 'iso-transl-y-umlaut [255]) +(defalias 'iso-transl-no-break-space [? ]) +(defalias 'iso-transl-inverted-exclamation-mark [?¡]) +(defalias 'iso-transl-cent-sign [?¢]) +(defalias 'iso-transl-pound-sign [?£]) +(defalias 'iso-transl-general-currency-sign [?¤]) +(defalias 'iso-transl-yen-sign [?¥]) +(defalias 'iso-transl-broken-vertical-line [?¦]) +(defalias 'iso-transl-section-sign [?§]) +(defalias 'iso-transl-diaeresis [?¨]) +(defalias 'iso-transl-copyright-sign [?©]) +(defalias 'iso-transl-ordinal-indicator-feminine [?ª]) +(defalias 'iso-transl-angle-left [?«]) +(defalias 'iso-transl-not-sign [?¬]) +(defalias 'iso-transl-soft-hyphen [?]) +(defalias 'iso-transl-registered-sign [?®]) +(defalias 'iso-transl-macron [?¯]) +(defalias 'iso-transl-degree-sign [?°]) +(defalias 'iso-transl-plus-or-minus-sign [?±]) +(defalias 'iso-transl-superscript-2 [?²]) +(defalias 'iso-transl-superscript-3 [?³]) +(defalias 'iso-transl-acute-accent [?´]) +(defalias 'iso-transl-micro-sign [?µ]) +(defalias 'iso-transl-pilcrow [?¶]) +(defalias 'iso-transl-middle-dot [?·]) +(defalias 'iso-transl-cedilla [?¸]) +(defalias 'iso-transl-superscript-1 [?¹]) +(defalias 'iso-transl-ordinal-indicator-masculine [?º]) +(defalias 'iso-transl-angle-right [?»]) +(defalias 'iso-transl-one-quarter [?¼]) +(defalias 'iso-transl-one-half [?½]) +(defalias 'iso-transl-three-quarters [?¾]) +(defalias 'iso-transl-inverted-question-mark [?¿]) +(defalias 'iso-transl-A-grave [?À]) +(defalias 'iso-transl-A-acute [?Á]) +(defalias 'iso-transl-A-caret [?Â]) +(defalias 'iso-transl-A-tilde [?Ã]) +(defalias 'iso-transl-A-umlaut [?Ä]) +(defalias 'iso-transl-A-ring [?Å]) +(defalias 'iso-transl-AE [?Æ]) +(defalias 'iso-transl-C-cedilla [?Ç]) +(defalias 'iso-transl-E-grave [?È]) +(defalias 'iso-transl-E-acute [?É]) +(defalias 'iso-transl-E-caret [?Ê]) +(defalias 'iso-transl-E-umlaut [?Ë]) +(defalias 'iso-transl-I-grave [?Ì]) +(defalias 'iso-transl-I-acute [?Í]) +(defalias 'iso-transl-I-caret [?Î]) +(defalias 'iso-transl-I-umlaut [?Ï]) +(defalias 'iso-transl-D-stroke [?Ð]) +(defalias 'iso-transl-N-tilde [?Ñ]) +(defalias 'iso-transl-O-grave [?Ò]) +(defalias 'iso-transl-O-acute [?Ó]) +(defalias 'iso-transl-O-caret [?Ô]) +(defalias 'iso-transl-O-tilde [?Õ]) +(defalias 'iso-transl-O-umlaut [?Ö]) +(defalias 'iso-transl-multiplication-sign [?×]) +(defalias 'iso-transl-O-slash [?Ø]) +(defalias 'iso-transl-U-grave [?Ù]) +(defalias 'iso-transl-U-acute [?Ú]) +(defalias 'iso-transl-U-caret [?Û]) +(defalias 'iso-transl-U-umlaut [?Ü]) +(defalias 'iso-transl-Y-acute [?Ý]) +(defalias 'iso-transl-THORN [?Þ]) +(defalias 'iso-transl-ss [?ß]) +(defalias 'iso-transl-a-grave [?à]) +(defalias 'iso-transl-a-acute [?á]) +(defalias 'iso-transl-a-caret [?â]) +(defalias 'iso-transl-a-tilde [?ã]) +(defalias 'iso-transl-a-umlaut [?ä]) +(defalias 'iso-transl-a-ring [?å]) +(defalias 'iso-transl-ae [?æ]) +(defalias 'iso-transl-c-cedilla [?ç]) +(defalias 'iso-transl-e-grave [?è]) +(defalias 'iso-transl-e-acute [?é]) +(defalias 'iso-transl-e-caret [?ê]) +(defalias 'iso-transl-e-umlaut [?ë]) +(defalias 'iso-transl-i-grave [?ì]) +(defalias 'iso-transl-i-acute [?í]) +(defalias 'iso-transl-i-caret [?î]) +(defalias 'iso-transl-i-umlaut [?ï]) +(defalias 'iso-transl-d-stroke [?ð]) +(defalias 'iso-transl-n-tilde [?ñ]) +(defalias 'iso-transl-o-grave [?ò]) +(defalias 'iso-transl-o-acute [?ó]) +(defalias 'iso-transl-o-caret [?ô]) +(defalias 'iso-transl-o-tilde [?õ]) +(defalias 'iso-transl-o-umlaut [?ö]) +(defalias 'iso-transl-division-sign [?÷]) +(defalias 'iso-transl-o-slash [?ø]) +(defalias 'iso-transl-u-grave [?ù]) +(defalias 'iso-transl-u-acute [?ú]) +(defalias 'iso-transl-u-caret [?û]) +(defalias 'iso-transl-u-umlaut [?ü]) +(defalias 'iso-transl-y-acute [?ý]) +(defalias 'iso-transl-thorn [?þ]) +(defalias 'iso-transl-y-umlaut [?ÿ]) ;; Language-specific translation lists. (defvar iso-transl-language-alist '(("Esperanto" - ("C" . [198]) - ("G" . [216]) - ("H" . [166]) - ("J" . [172]) - ("S" . [222]) - ("U" . [221]) - ("c" . [230]) - ("g" . [248]) - ("h" . [182]) - ("j" . [188]) - ("s" . [254]) - ("u" . [253])) + ("C" . [?Æ]) + ("G" . [?Ø]) + ("H" . [?¦]) + ("J" . [?¬]) + ("S" . [?Þ]) + ("U" . [?Ý]) + ("c" . [?æ]) + ("g" . [?ø]) + ("h" . [?¶]) + ("j" . [?¼]) + ("s" . [?þ]) + ("u" . [?ý])) ("French" - ("C" . [199]) - ("c" . [231])) + ("C" . [?Ç]) + ("c" . [?ç])) ("German" - ("A" . [196]) - ("O" . [214]) - ("U" . [220]) - ("a" . [228]) - ("o" . [246]) - ("s" . [223]) - ("u" . [252])) + ("A" . [?Ä]) + ("O" . [?Ö]) + ("U" . [?Ü]) + ("a" . [?ä]) + ("o" . [?ö]) + ("s" . [?ß]) + ("u" . [?ü])) ("Portuguese" - ("C" . [199]) - ("c" . [231])) + ("C" . [?Ç]) + ("c" . [?ç])) ("Spanish" - ("!" . [161]) - ("?" . [191]) - ("N" . [209]) - ("n" . [241])))) + ("!" . [?¡]) + ("?" . [?¿]) + ("N" . [?Ñ]) + ("n" . [?ñ])))) (defvar iso-transl-ctl-x-8-map nil "Keymap for C-x 8 prefix.") |