summaryrefslogtreecommitdiff
path: root/lisp/international/iso-transl.el
diff options
context:
space:
mode:
authorDave Love <fx@gnu.org>2001-12-07 14:56:44 +0000
committerDave Love <fx@gnu.org>2001-12-07 14:56:44 +0000
commitb9563f072626a0f2a128e49643ff7ccc1320348c (patch)
treef872804e6af745dbf0135a43bd858b3efef081f1 /lisp/international/iso-transl.el
parent419afed9bd5f80189a818b3b32f9728e4e2bf0e0 (diff)
downloademacs-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.el248
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.")