Mercurial > emacs

changeset 26822:62c80c35f341

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
("esperanto-prefix"): Make it produce Latin-3 characters, not Latin-1.
author Kenichi Handa <handa@m17n.org>
date Mon, 13 Dec 1999 01:13:00 +0000
parents c785a9439eaf
children aa74cdb3570e
files leim/quail/latin-pre.el
diffstat 1 files changed, 15 insertions(+), 15 deletions(-) [+]
line wrap: on
line diff
--- a/leim/quail/latin-pre.el	Sun Dec 12 18:53:40 1999 +0000
+++ b/leim/quail/latin-pre.el	Mon Dec 13 01:13:00 1999 +0000
@@ -180,28 +180,28 @@
 )
 
 (quail-define-package
- "esperanto-prefix" "Latin-1" "EO>" t
+ "esperanto-prefix" "Latin-3" "EO>" t
  "Esperanto input method with prefix modifiers
 Key translation rules are:
- ^H -> ?,A&(B   ^J -> ?,A,(B   ^h -> ?,A6(B   ^j -> ?,A<(B   ^C -> ?,AF(B   ^G -> ?,AX(B,
- ^S -> ?,A^(B   ^c -> ?,Af(B   ^g -> ?,Ax(B   ^s -> ?,A~(B   ~U -> ?,A](B   ~u -> ?,A}(B
+ ^H -> ?,C&(B   ^J -> ?,C,(B   ^h -> ?,C6(B   ^j -> ?,C<(B   ^C -> ?,CF(B   ^G -> ?,CX(B,
+ ^S -> ?,C^(B   ^c -> ?,Cf(B   ^g -> ?,Cx(B   ^s -> ?,C~(B   ~U -> ?,C](B   ~u -> ?,C}(B
 " nil t nil nil nil nil nil nil nil nil t)
 
 (quail-define-rules
- ("^H" ?,A&(B)
- ("^J" ?,A,(B)
- ("^h" ?,A6(B)
- ("^j" ?,A<(B)
- ("^C" ?,AF(B)
- ("^G" ?,AX(B)
- ("^S" ?,A^(B)
- ("^c" ?,Af(B)
- ("^g" ?,Ax(B)
- ("^s" ?,A~(B)
+ ("^H" ?,C&(B)
+ ("^J" ?,C,(B)
+ ("^h" ?,C6(B)
+ ("^j" ?,C<(B)
+ ("^C" ?,CF(B)
+ ("^G" ?,CX(B)
+ ("^S" ?,C^(B)
+ ("^c" ?,Cf(B)
+ ("^g" ?,Cx(B)
+ ("^s" ?,C~(B)
  ("^^" ?^)
  ("^ " ?^)
- ("~U" ?,A](B)
- ("~u" ?,A}(B)
+ ("~U" ?,C](B)
+ ("~u" ?,C}(B)
  ("~ " ?~)
 )