("esperanto-prefix"): Make it produce Latin-3

characters, not Latin-1.

diff --git a/leim/quail/latin-pre.el b/leim/quail/latin-pre.el
index ec5e2d9b59c2140f5fe5bacf7f6401a7641a3bc1..64a33d281748cb17df3397c7850cd2ef1b12997e 100644 (file)
--- a/leim/quail/latin-pre.el
+++ b/leim/quail/latin-pre.el
@@ -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 -> ?\e,A&\e(B   ^J -> ?\e,A,\e(B   ^h -> ?\e,A6\e(B   ^j -> ?\e,A<\e(B   ^C -> ?\e,AF\e(B   ^G -> ?\e,AX\e(B,
- ^S -> ?\e,A^\e(B   ^c -> ?\e,Af\e(B   ^g -> ?\e,Ax\e(B   ^s -> ?\e,A~\e(B   ~U -> ?\e,A]\e(B   ~u -> ?\e,A}\e(B
+ ^H -> ?\e,C&\e(B   ^J -> ?\e,C,\e(B   ^h -> ?\e,C6\e(B   ^j -> ?\e,C<\e(B   ^C -> ?\e,CF\e(B   ^G -> ?\e,CX\e(B,
+ ^S -> ?\e,C^\e(B   ^c -> ?\e,Cf\e(B   ^g -> ?\e,Cx\e(B   ^s -> ?\e,C~\e(B   ~U -> ?\e,C]\e(B   ~u -> ?\e,C}\e(B
 " nil t nil nil nil nil nil nil nil nil t)
 
 (quail-define-rules
- ("^H" ?\e,A&\e(B)
- ("^J" ?\e,A,\e(B)
- ("^h" ?\e,A6\e(B)
- ("^j" ?\e,A<\e(B)
- ("^C" ?\e,AF\e(B)
- ("^G" ?\e,AX\e(B)
- ("^S" ?\e,A^\e(B)
- ("^c" ?\e,Af\e(B)
- ("^g" ?\e,Ax\e(B)
- ("^s" ?\e,A~\e(B)
+ ("^H" ?\e,C&\e(B)
+ ("^J" ?\e,C,\e(B)
+ ("^h" ?\e,C6\e(B)
+ ("^j" ?\e,C<\e(B)
+ ("^C" ?\e,CF\e(B)
+ ("^G" ?\e,CX\e(B)
+ ("^S" ?\e,C^\e(B)
+ ("^c" ?\e,Cf\e(B)
+ ("^g" ?\e,Cx\e(B)
+ ("^s" ?\e,C~\e(B)
  ("^^" ?^)
  ("^ " ?^)
- ("~U" ?\e,A]\e(B)
- ("~u" ?\e,A}\e(B)
+ ("~U" ?\e,C]\e(B)
+ ("~u" ?\e,C}\e(B)
  ("~ " ?~)
 )