diff options
author | Richard M. Stallman <rms@gnu.org> | 1995-10-12 22:28:07 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1995-10-12 22:28:07 +0000 |
commit | 9d0bc1fce5bc64cebce2e9fad775b5a4508f5c48 (patch) | |
tree | b697627d541478106703e76fb95123012282cf41 | |
parent | 70c5948fc770cdccb69defcf9484b66601ec7889 (diff) | |
download | emacs-9d0bc1fce5bc64cebce2e9fad775b5a4508f5c48.tar.gz |
Handle aliases dead-acute,...
-rw-r--r-- | lisp/international/iso-transl.el | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/lisp/international/iso-transl.el b/lisp/international/iso-transl.el index e2fdd9e4eeb..ca674b3e0b6 100644 --- a/lisp/international/iso-transl.el +++ b/lisp/international/iso-transl.el @@ -40,6 +40,22 @@ (?\~ . mute-asciitilde)) "Mapping of ASCII characters to their corresponding dead-key symbols.") +;; Some X servers use these alternate names. +(or key-translation-map + (setq key-translation-map (make-sparse-keymap))) +(define-key key-translation-map [dead-acute] [mute-acute]) +(define-key key-translation-map [dead-grave] [mute-grave]) +(define-key key-translation-map [dead-diaeresis] [mute-diaeresis]) +(define-key key-translation-map [dead-asciicircum] [mute-asciicircum]) +(define-key key-translation-map [dead-asciitilde] [mute-asciitilde]) +;; Someone reports that these keys don't work if shifted. +;; This might fix it--no word yet. +(define-key key-translation-map [S-dead-acute] [mute-acute]) +(define-key key-translation-map [S-dead-grave] [mute-grave]) +(define-key key-translation-map [S-dead-diaeresis] [mute-diaeresis]) +(define-key key-translation-map [S-dead-asciicircum] [mute-asciicircum]) +(define-key key-translation-map [S-dead-asciitilde] [mute-asciitilde]) + ;; The two-character mnemonics are intended to be available in all languages. ;; The ones beginning with `*' have one-character synonyms, but a ;; language-specific table might override the short form for its own use. |