("lithuanian-numeric", "lithuanian-keyboard", "latvian-keyboard"):

Fix bogus LHS of rules.

diff --git a/leim/quail/latin-alt.el b/leim/quail/latin-alt.el
index 361fd172ebbf4cf2693928cf463db83b75b82f74..c81a893b6cc46ee32866fb9cc86b6a4c7282a893 100644 (file)
--- a/leim/quail/latin-alt.el
+++ b/leim/quail/latin-alt.el
@@ -1628,27 +1628,26 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
 " nil t t t t nil nil nil nil nil t)
 
 (quail-define-rules
- (?1 ?\e$,1 %\e(B)
- (?2 ?\e$,1 -\e(B)
- (?3 ?\e$,1 9\e(B)
- (?4 ?\e$,1 7\e(B)
- (?5 ?\e$,1 O\e(B)
- (?6 ?\e$,1!!\e(B)
- (?7 ?\e$,1!3\e(B)
- (?8 ?\e$,1!+\e(B)
- (?9 ?\e$,1r~\e(B)
- (?0 ?\e$,1r|\e(B)
- (?= ?\e$,1!>\e(B)
- (?! ?\e$,1 $\e(B)
- (?@ ?\e$,1 ,\e(B)
- (?# ?\e$,1 8\e(B)
- (?$ ?\e$,1 6\e(B)
- (?% ?\e$,1 N\e(B)
- (?^ ?\e$,1! \e(B)
- (?& ?\e$,1!2\e(B)
- (?* ?\e$,1!*\e(B)
- (?+ ?\e$,1!=\e(B))
-
+ ("?1" ?\e$,1 %\e(B)
+ ("?2" ?\e$,1 -\e(B)
+ ("?3" ?\e$,1 9\e(B)
+ ("?4" ?\e$,1 7\e(B)
+ ("?5" ?\e$,1 O\e(B)
+ ("?6" ?\e$,1!!\e(B)
+ ("?7" ?\e$,1!3\e(B)
+ ("?8" ?\e$,1!+\e(B)
+ ("?9" ?\e$,1r~\e(B)
+ ("?0" ?\e$,1r|\e(B)
+ ("?=" ?\e$,1!>\e(B)
+ ("?!" ?\e$,1 $\e(B)
+ ("?@" ?\e$,1 ,\e(B)
+ ("?#" ?\e$,1 8\e(B)
+ ("?$" ?\e$,1 6\e(B)
+ ("?%" ?\e$,1 N\e(B)
+ ("?^" ?\e$,1! \e(B)
+ ("?&" ?\e$,1!2\e(B)
+ ("?*" ?\e$,1!*\e(B)
+ ("?+" ?\e$,1!=\e(B))
 
 ;; From XFree 4.1 /usr/X11R6/lib/X11/xkb/symbols/lt, suggested by
 ;; Albertas Agejevas <alga@uosis.mif.vu.lt>
@@ -1658,23 +1657,23 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
 " nil t t t t nil nil nil nil nil t)
 
 (quail-define-rules
- (?1 ?\e$,1 %\e(B)
- (?! ?\e$,1 $\e(B)
- (?2 ?\e$,1 -\e(B)
- (?@ ?\e$,1 ,\e(B)
- (?# ?\e$,1 8\e(B)
- (?4 ?\e$,1 7\e(B)
- (?$ ?\e$,1 6\e(B)
- (?5 ?\e$,1 O\e(B)
- (?% ?\e$,1 N\e(B)
- (?6 ?\e$,1!!\e(B)
- (?^ ?\e$,1! \e(B)
- (?7 ?\e$,1!3\e(B)
- (?& ?\e$,1!2\e(B)
- (?9 ?\e$,1r~\e(B)
- (?0 ?\e$,1r|\e(B)
- (?= ?\e$,1!>\e(B)
- (?+ ?\e$,1!=\e(B))
+ ("?1" ?\e$,1 %\e(B)
+ ("?!" ?\e$,1 $\e(B)
+ ("?2" ?\e$,1 -\e(B)
+ ("?@" ?\e$,1 ,\e(B)
+ ("?#" ?\e$,1 8\e(B)
+ ("?4" ?\e$,1 7\e(B)
+ ("?$" ?\e$,1 6\e(B)
+ ("?5" ?\e$,1 O\e(B)
+ ("?%" ?\e$,1 N\e(B)
+ ("?6" ?\e$,1!!\e(B)
+ ("?^" ?\e$,1! \e(B)
+ ("?7" ?\e$,1!3\e(B)
+ ("?&" ?\e$,1!2\e(B)
+ ("?9" ?\e$,1r~\e(B)
+ ("?0" ?\e$,1r|\e(B)
+ ("?=" ?\e$,1!>\e(B)
+ ("?+" ?\e$,1!=\e(B))
 
 ;; From XFree 4.1 /usr/X11R6/lib/X11/xkb/symbols/lv
 (quail-define-package
@@ -1683,35 +1682,35 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
 " nil t t t t nil nil nil nil nil t)
 
 (quail-define-rules
- (?4 ?\e$,1tL\e(B)
- (?$ ?\e,A"\e(B)
- (?e ?\e$,1 3\e(B)
- (?E ?\e$,1 2\e(B)
- (?r ?\e$,1 w\e(B)
- (?R ?\e$,1 v\e(B)
- (?u ?\e$,1!+\e(B)
- (?U ?\e$,1!*\e(B)
- (?i ?\e$,1 K\e(B)
- (?I ?\e$,1 J\e(B)
- (?o ?\e$,1 m\e(B)
- (?O ?\e$,1 l\e(B)
- (?a ?\e$,1 !\e(B)
- (?A ?\e$,1  \e(B)
- (?s ?\e$,1!!\e(B)
- (?S ?\e$,1! \e(B)
- (?g ?\e$,1 C\e(B)
- (?G ?\e$,1 B\e(B)
- (?k ?\e$,1 W\e(B)
- (?K ?\e$,1 V\e(B)
- (?l ?\e$,1 \\e(B)
- (?L ?\e$,1 [\e(B)
- (?\' ?\e$,1r|\e(B)
- (?\" ?\e$,1r~\e(B)
- (?z ?\e$,1!>\e(B)
- (?Z ?\e$,1!=\e(B)
- (?c ?\e$,1 -\e(B)
- (?C ?\e$,1 ,\e(B)
- (?n ?\e$,1 f\e(B)
- (?N ?\e$,1 e\e(B))
+ ("?4" ?\e$,1tL\e(B)
+ ("?$" ?\e,A"\e(B)
+ ("?e" ?\e$,1 3\e(B)
+ ("?E" ?\e$,1 2\e(B)
+ ("?r" ?\e$,1 w\e(B)
+ ("?R" ?\e$,1 v\e(B)
+ ("?u" ?\e$,1!+\e(B)
+ ("?U" ?\e$,1!*\e(B)
+ ("?i" ?\e$,1 K\e(B)
+ ("?I" ?\e$,1 J\e(B)
+ ("?o" ?\e$,1 m\e(B)
+ ("?O" ?\e$,1 l\e(B)
+ ("?a" ?\e$,1 !\e(B)
+ ("?A" ?\e$,1  \e(B)
+ ("?s" ?\e$,1!!\e(B)
+ ("?S" ?\e$,1! \e(B)
+ ("?g" ?\e$,1 C\e(B)
+ ("?G" ?\e$,1 B\e(B)
+ ("?k" ?\e$,1 W\e(B)
+ ("?K" ?\e$,1 V\e(B)
+ ("?l" ?\e$,1 \\e(B)
+ ("?L" ?\e$,1 [\e(B)
+ ("?\'" ?\e$,1r|\e(B)
+ ("?\"" ?\e$,1r~\e(B)
+ ("?z" ?\e$,1!>\e(B)
+ ("?Z" ?\e$,1!=\e(B)
+ ("?c" ?\e$,1 -\e(B)
+ ("?C" ?\e$,1 ,\e(B)
+ ("?n" ?\e$,1 f\e(B)
+ ("?N" ?\e$,1 e\e(B))
 
 ;;; latin-alt.el ends here