emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/leim/quail/latin-alt.el


From: Dave Love
Subject: [Emacs-diffs] Changes to emacs/leim/quail/latin-alt.el
Date: Fri, 14 Dec 2001 19:24:11 -0500

Index: emacs/leim/quail/latin-alt.el
diff -c emacs/leim/quail/latin-alt.el:1.11 emacs/leim/quail/latin-alt.el:1.12
*** emacs/leim/quail/latin-alt.el:1.11  Thu Nov 15 07:29:03 2001
--- emacs/leim/quail/latin-alt.el       Fri Dec 14 19:24:11 2001
***************
*** 1017,1023 ****
   )
  
  (quail-define-package
!  "french-alt-postfix" "Latin-1" "FR<" t
   "French (Fran,Ag(Bais) input method with postfix modifiers
  
  ` pour grave, ' pour aigu, ^ pour circonflexe, et \" pour tr,Ai(Bma.
--- 1017,1023 ----
   )
  
  (quail-define-package
!  "french-alt-postfix" "French" "FR<" t
   "French (Fran,Ag(Bais) input method with postfix modifiers
  
  ` pour grave, ' pour aigu, ^ pour circonflexe, et \" pour tr,Ai(Bma.
***************
*** 1092,1098 ****
   )
  
  (quail-define-package
!  "german-alt-postfix" "Latin-1" "DE<" t
   "German (Deutsch) input method
  
  ae  -> ,Ad(B
--- 1092,1098 ----
   )
  
  (quail-define-package
!  "german-alt-postfix" "German" "DE<" t
   "German (Deutsch) input method
  
  ae  -> ,Ad(B
***************
*** 1330,1336 ****
   )
  
  (quail-define-package
!  "spanish-alt-postfix" "Latin-1" "ES<" t
   "Spanish (Espa,Aq(Bol) input method with postfix modifiers
  
  A' -> ,AA(B
--- 1330,1336 ----
   )
  
  (quail-define-package
!  "spanish-alt-postfix" "Spanish" "ES<" t
   "Spanish (Espa,Aq(Bol) input method with postfix modifiers
  
  A' -> ,AA(B
***************
*** 1406,1413 ****
   )
  
  (quail-define-package
!  "turkish-latin-3-alt-postfix" "Latin-3" "TR3<<" t
!  "Turkish (T,C|(Brk,Cg(Be) input method with postfix modifiers.
  
  This is for those who use Latin-3 (ISO-8859-3) for Turkish.  If you
  use Latin-5 (ISO-8859-9), you should use \"turkish-alt-postfix\" instead.
--- 1406,1413 ----
   )
  
  (quail-define-package
!  "turkish-latin-3-alt-postfix" "Turkish" "TR3<<" t
!  "Turkish (T,A|(Brk,Ag(Be) input method with postfix modifiers.
  
  This is for those who use Latin-3 (ISO-8859-3) for Turkish.  If you
  use Latin-5 (ISO-8859-9), you should use \"turkish-alt-postfix\" instead.
***************
*** 1468,1475 ****
   )
  
  (quail-define-package
!  "turkish-alt-postfix" "Latin-5" "TR,M+(B" t
!  "Turkish (T,M|(Brk,Mg(Be) input method with postfix modifiers.
  
  This is for those who use Latin-5 (ISO-8859-9) for Turkish.  If you
  use Latin-3 (ISO-8859-3), you should use
--- 1468,1475 ----
   )
  
  (quail-define-package
!  "turkish-alt-postfix" "Turkish" "TR,A+(B" t
!  "Turkish (T,A|(Brk,Ag(Be) input method with postfix modifiers.
  
  This is for those who use Latin-5 (ISO-8859-9) for Turkish.  If you
  use Latin-3 (ISO-8859-3), you should use
***************
*** 1533,1539 ****
  ;; Dutch Quail input method derived from the one in Yudit by Roman
  ;; Czyborra.
  (quail-define-package
!  "dutch" "Latin" "NL" t
   "Dutch character mixfix input method.
  Uses the `mule-unicode-0100-24ff' charset to supplement Latin-1.
  
--- 1533,1539 ----
  ;; Dutch Quail input method derived from the one in Yudit by Roman
  ;; Czyborra.
  (quail-define-package
!  "dutch" "Dutch" "NL" t
   "Dutch character mixfix input method.
  Uses the `mule-unicode-0100-24ff' charset to supplement Latin-1.
  
***************
*** 1557,1623 ****
  " nil t nil nil nil nil nil nil nil nil t)
  
  (quail-define-rules
!  ("fl." "$,1!R(B") ;; LATIN SMALL LETTER F WITH HOOK (florin currency 
symbol)
!  ("eur." "$,1tL(B") ;; EURO SIGN
   ;; $,1r|(BThe 25th letter of the Dutch alphabet.$,1r}(B
!  ("ij" "$,1 S(B") ;; LATIN SMALL LIGATURE IJ   
!  ("IJ" "$,1 R(B") ;; LATIN CAPITAL LIGATURE IJ   
   ;; $,1r|(BTrema on the second letter of vowel pair.$,1r}(B  Yudit uses 
`:', not `"'.
!  ("\"a" ",Ad(B") ;; LATIN SMALL LETTER A WITH DIAERESIS 
!  ("\"e" ",Ak(B") ;; LATIN SMALL LETTER E WITH DIAERESIS 
!  ("\"i" ",Ao(B") ;; LATIN SMALL LETTER I WITH DIAERESIS 
!  ("\"o" ",Av(B") ;; LATIN SMALL LETTER O WITH DIAERESIS 
!  ("\"u" ",A|(B") ;; LATIN SMALL LETTER U WITH DIAERESIS 
!  ("\"A" ",AD(B") ;; LATIN CAPITAL LETTER A WITH DIAERESIS 
!  ("\"E" ",AK(B") ;; LATIN CAPITAL LETTER E WITH DIAERESIS 
!  ("\"I" ",AO(B") ;; LATIN CAPITAL LETTER I WITH DIAERESIS 
!  ("\"O" ",AV(B") ;; LATIN CAPITAL LETTER O WITH DIAERESIS 
!  ("\"U" ",A\(B") ;; LATIN CAPITAL LETTER U WITH DIAERESIS 
   ;; $,1r|(BAcute, marking emphasis on long vowels$,1r}(B:
!  ("a'" ",Aa(B") ;; LATIN SMALL LETTER A WITH ACUTE 
!  ("e'" ",Ai(B") ;; LATIN SMALL LETTER E WITH ACUTE 
!  ("i'" ",Am(B") ;; LATIN SMALL LETTER I WITH ACUTE 
!  ("o'" ",As(B") ;; LATIN SMALL LETTER O WITH ACUTE 
!  ("u'" ",Az(B") ;; LATIN SMALL LETTER U WITH ACUTE 
!  ("A'" ",AA(B") ;; LATIN CAPITAL LETTER A WITH ACUTE 
!  ("E'" ",AI(B") ;; LATIN CAPITAL LETTER E WITH ACUTE 
!  ("I'" ",AM(B") ;; LATIN CAPITAL LETTER I WITH ACUTE 
!  ("O'" ",AS(B") ;; LATIN CAPITAL LETTER O WITH ACUTE 
!  ("U'" ",AZ(B") ;; LATIN CAPITAL LETTER U WITH ACUTE 
   ;; $,1r|(BGrave, marking emphasis on short vowels$,1r}(B:
!  ("a`" ",A`(B") ;; LATIN SMALL LETTER A WITH GRAVE
!  ("e`" ",Ah(B") ;; LATIN SMALL LETTER E WITH GRAVE 
!  ("i`" ",Al(B") ;; LATIN SMALL LETTER I WITH GRAVE 
!  ("o`" ",Ar(B") ;; LATIN SMALL LETTER O WITH GRAVE 
!  ("u`" ",Ay(B") ;; LATIN SMALL LETTER U WITH GRAVE 
!  ("A`" ",address@hidden(B") ;; LATIN CAPITAL LETTER A WITH GRAVE 
!  ("E`" ",AH(B") ;; LATIN CAPITAL LETTER E WITH GRAVE 
!  ("I`" ",AL(B") ;; LATIN CAPITAL LETTER I WITH GRAVE 
!  ("O`" ",AR(B") ;; LATIN CAPITAL LETTER O WITH GRAVE 
!  ("U`" ",AY(B") ;; LATIN CAPITAL LETTER U WITH GRAVE
   ;; $,1r|(BCater for the use of many French words and use of the circumflex
   ;; in Frisian.$,1r}(B  Yudit used `;' for cedilla.
!  ("c," ",Ag(B") ;; LATIN SMALL LETTER C WITH CEDILLA 
!  ("C," ",AG(B") ;; LATIN CAPITAL LETTER C WITH CEDILLA 
!  ("a^" ",Ab(B") ;; LATIN SMALL LETTER A WITH CIRCUMFLEX 
!  ("e^" ",Aj(B") ;; LATIN SMALL LETTER E WITH CIRCUMFLEX 
!  ("i^" ",An(B") ;; LATIN SMALL LETTER I WITH CIRCUMFLEX 
!  ("o^" ",At(B") ;; LATIN SMALL LETTER O WITH CIRCUMFLEX 
!  ("u^" ",A{(B") ;; LATIN SMALL LETTER U WITH CIRCUMFLEX 
!  ("A^" ",AB(B") ;; LATIN CAPITAL LETTER A WITH CIRCUMFLEX 
!  ("E^" ",AJ(B") ;; LATIN CAPITAL LETTER E WITH CIRCUMFLEX 
!  ("I^" ",AN(B") ;; LATIN CAPITAL LETTER I WITH CIRCUMFLEX 
!  ("O^" ",AT(B") ;; LATIN CAPITAL LETTER O WITH CIRCUMFLEX 
!  ("U^" ",A[(B") ;; LATIN CAPITAL LETTER U WITH CIRCUMFLEX
   ;; $,1r|(BFollow the example of the Dutch POSIX locale, using ISO-8859-9 to
   ;; cater to the many Turks in Dutch society.$,1r}(B  Perhaps German methods
   ;; should do so too.  Follow turkish-alt-postfix here.
!  ("i/" "$,1 Q(B") ;; LATIN SMALL LETTER I WITH NO DOT
!  ("s," "$,1 (B") ;; LATIN SMALL LETTER S WITH CEDILLA 
!  ("g^" "$,1 ?(B") ;; LATIN SMALL LETTER G WITH BREVE 
!  ("I/" "$,1 P(B") ;; LATIN CAPITAL LETTER I WITH DOT ABOVE
!  ("S," "$,1 ~(B") ;; LATIN CAPITAL LETTER S WITH CEDILLA 
!  ("G^" "$,1 >(B") ;; LATIN CAPITAL LETTER G WITH BREVE 
   )
  
  ;;; latin-alt.el ends here
--- 1557,1717 ----
  " nil t nil nil nil nil nil nil nil nil t)
  
  (quail-define-rules
!  ("fl." ?$,1!R(B) ;; LATIN SMALL LETTER F WITH HOOK (florin currency symbol)
!  ("eur." ?$,1tL(B) ;; EURO SIGN
   ;; $,1r|(BThe 25th letter of the Dutch alphabet.$,1r}(B
!  ("ij" ?$,1 S(B) ;; LATIN SMALL LIGATURE IJ   
!  ("IJ" ?$,1 R(B) ;; LATIN CAPITAL LIGATURE IJ   
   ;; $,1r|(BTrema on the second letter of vowel pair.$,1r}(B  Yudit uses 
`:', not `"'.
!  ("\"a" ?,Ad(B) ;; LATIN SMALL LETTER A WITH DIAERESIS 
!  ("\"e" ?,Ak(B) ;; LATIN SMALL LETTER E WITH DIAERESIS 
!  ("\"i" ?,Ao(B) ;; LATIN SMALL LETTER I WITH DIAERESIS 
!  ("\"o" ?,Av(B) ;; LATIN SMALL LETTER O WITH DIAERESIS 
!  ("\"u" ?,A|(B) ;; LATIN SMALL LETTER U WITH DIAERESIS 
!  ("\"A" ?,AD(B) ;; LATIN CAPITAL LETTER A WITH DIAERESIS 
!  ("\"E" ?,AK(B) ;; LATIN CAPITAL LETTER E WITH DIAERESIS 
!  ("\"I" ?,AO(B) ;; LATIN CAPITAL LETTER I WITH DIAERESIS 
!  ("\"O" ?,AV(B) ;; LATIN CAPITAL LETTER O WITH DIAERESIS 
!  ("\"U" ?,A\(B) ;; LATIN CAPITAL LETTER U WITH DIAERESIS 
   ;; $,1r|(BAcute, marking emphasis on long vowels$,1r}(B:
!  ("a'" ?,Aa(B) ;; LATIN SMALL LETTER A WITH ACUTE 
!  ("e'" ?,Ai(B) ;; LATIN SMALL LETTER E WITH ACUTE 
!  ("i'" ?,Am(B) ;; LATIN SMALL LETTER I WITH ACUTE 
!  ("o'" ?,As(B) ;; LATIN SMALL LETTER O WITH ACUTE 
!  ("u'" ?,Az(B) ;; LATIN SMALL LETTER U WITH ACUTE 
!  ("A'" ?,AA(B) ;; LATIN CAPITAL LETTER A WITH ACUTE 
!  ("E'" ?,AI(B) ;; LATIN CAPITAL LETTER E WITH ACUTE 
!  ("I'" ?,AM(B) ;; LATIN CAPITAL LETTER I WITH ACUTE 
!  ("O'" ?,AS(B) ;; LATIN CAPITAL LETTER O WITH ACUTE 
!  ("U'" ?,AZ(B) ;; LATIN CAPITAL LETTER U WITH ACUTE 
   ;; $,1r|(BGrave, marking emphasis on short vowels$,1r}(B:
!  ("a`" ?,A`(B) ;; LATIN SMALL LETTER A WITH GRAVE
!  ("e`" ?,Ah(B) ;; LATIN SMALL LETTER E WITH GRAVE 
!  ("i`" ?,Al(B) ;; LATIN SMALL LETTER I WITH GRAVE 
!  ("o`" ?,Ar(B) ;; LATIN SMALL LETTER O WITH GRAVE 
!  ("u`" ?,Ay(B) ;; LATIN SMALL LETTER U WITH GRAVE 
!  ("A`" ?,address@hidden(B) ;; LATIN CAPITAL LETTER A WITH GRAVE 
!  ("E`" ?,AH(B) ;; LATIN CAPITAL LETTER E WITH GRAVE 
!  ("I`" ?,AL(B) ;; LATIN CAPITAL LETTER I WITH GRAVE 
!  ("O`" ?,AR(B) ;; LATIN CAPITAL LETTER O WITH GRAVE 
!  ("U`" ?,AY(B) ;; LATIN CAPITAL LETTER U WITH GRAVE
   ;; $,1r|(BCater for the use of many French words and use of the circumflex
   ;; in Frisian.$,1r}(B  Yudit used `;' for cedilla.
!  ("c," ?,Ag(B) ;; LATIN SMALL LETTER C WITH CEDILLA 
!  ("C," ?,AG(B) ;; LATIN CAPITAL LETTER C WITH CEDILLA 
!  ("a^" ?,Ab(B) ;; LATIN SMALL LETTER A WITH CIRCUMFLEX 
!  ("e^" ?,Aj(B) ;; LATIN SMALL LETTER E WITH CIRCUMFLEX 
!  ("i^" ?,An(B) ;; LATIN SMALL LETTER I WITH CIRCUMFLEX 
!  ("o^" ?,At(B) ;; LATIN SMALL LETTER O WITH CIRCUMFLEX 
!  ("u^" ?,A{(B) ;; LATIN SMALL LETTER U WITH CIRCUMFLEX 
!  ("A^" ?,AB(B) ;; LATIN CAPITAL LETTER A WITH CIRCUMFLEX 
!  ("E^" ?,AJ(B) ;; LATIN CAPITAL LETTER E WITH CIRCUMFLEX 
!  ("I^" ?,AN(B) ;; LATIN CAPITAL LETTER I WITH CIRCUMFLEX 
!  ("O^" ?,AT(B) ;; LATIN CAPITAL LETTER O WITH CIRCUMFLEX 
!  ("U^" ?,A[(B) ;; LATIN CAPITAL LETTER U WITH CIRCUMFLEX
   ;; $,1r|(BFollow the example of the Dutch POSIX locale, using ISO-8859-9 to
   ;; cater to the many Turks in Dutch society.$,1r}(B  Perhaps German methods
   ;; should do so too.  Follow turkish-alt-postfix here.
!  ("i/" ?$,1 Q(B) ;; LATIN SMALL LETTER I WITH NO DOT
!  ("s," ?$,1 (B) ;; LATIN SMALL LETTER S WITH CEDILLA 
!  ("g^" ?$,1 ?(B) ;; LATIN SMALL LETTER G WITH BREVE 
!  ("I/" ?$,1 P(B) ;; LATIN CAPITAL LETTER I WITH DOT ABOVE
!  ("S," ?$,1 ~(B) ;; LATIN CAPITAL LETTER S WITH CEDILLA 
!  ("G^" ?$,1 >(B) ;; LATIN CAPITAL LETTER G WITH BREVE 
   )
+ 
+ ;; Originally from Yudit, discussed with Albertas Agejevas
+ ;; <address@hidden>
+ (quail-define-package
+  "lithuanian-numeric" "Lithuanian" "LtN" t
+  "Lithuanian numeric input method.
+ " nil t t t t nil nil nil nil nil t)
+ 
+ (quail-define-rules
+  (?1 ?$,1 %(B)
+  (?2 ?$,1 -(B)
+  (?3 ?$,1 9(B)
+  (?4 ?$,1 7(B)
+  (?5 ?$,1 O(B)
+  (?6 ?$,1!!(B)
+  (?7 ?$,1!3(B)
+  (?8 ?$,1!+(B)
+  (?9 ?$,1r~(B)
+  (?0 ?$,1r|(B)
+  (?= ?$,1!>(B)
+  (?! ?$,1 $(B)
+  (?@ ?$,1 ,(B)
+  (?# ?$,1 8(B)
+  (?$ ?$,1 6(B)
+  (?% ?$,1 N(B)
+  (?^ ?$,1! (B)
+  (?& ?$,1!2(B)
+  (?* ?$,1!*(B)
+  (?+ ?$,1!=(B))
+ 
+ 
+ ;; From XFree 4.1 /usr/X11R6/lib/X11/xkb/symbols/lt, suggested by
+ ;; Albertas Agejevas <address@hidden>
+ (quail-define-package
+  "lithuanian-keyboard" "Lithuanian" "Lt" t
+  "Lithuanian standard keyboard input method.
+ " nil t t t t nil nil nil nil nil t)
+ 
+ (quail-define-rules
+  (?1 ?$,1 %(B)
+  (?! ?$,1 $(B)
+  (?2 ?$,1 -(B)
+  (?@ ?$,1 ,(B)
+  (?# ?$,1 8(B)
+  (?4 ?$,1 7(B)
+  (?$ ?$,1 6(B)
+  (?5 ?$,1 O(B)
+  (?% ?$,1 N(B)
+  (?6 ?$,1!!(B)
+  (?^ ?$,1! (B)
+  (?7 ?$,1!3(B)
+  (?& ?$,1!2(B)
+  (?9 ?$,1r~(B)
+  (?0 ?$,1r|(B)
+  (?= ?$,1!>(B)
+  (?+ ?$,1!=(B))
+ 
+ ;; From XFree 4.1 /usr/X11R6/lib/X11/xkb/symbols/lv
+ (quail-define-package
+  "latvian-keyboard" "Latvian" "Lv" t
+  "Latvian standard keyboard input method.
+ " nil t t t t nil nil nil nil nil t)
+ 
+ (quail-define-rules
+  (?4 ?$,1tL(B)
+  (?$ ?,A"(B)
+  (?e ?$,1 3(B)
+  (?E ?$,1 2(B)
+  (?r ?$,1 w(B)
+  (?R ?$,1 v(B)
+  (?u ?$,1!+(B)
+  (?U ?$,1!*(B)
+  (?i ?$,1 K(B)
+  (?I ?$,1 J(B)
+  (?o ?$,1 m(B)
+  (?O ?$,1 l(B)
+  (?a ?$,1 !(B)
+  (?A ?$,1  (B)
+  (?s ?$,1!!(B)
+  (?S ?$,1! (B)
+  (?g ?$,1 C(B)
+  (?G ?$,1 B(B)
+  (?k ?$,1 W(B)
+  (?K ?$,1 V(B)
+  (?l ?$,1 \(B)
+  (?L ?$,1 [(B)
+  (?\' ?$,1r|(B)
+  (?\" ?$,1r~(B)
+  (?z ?$,1!>(B)
+  (?Z ?$,1!=(B)
+  (?c ?$,1 -(B)
+  (?C ?$,1 ,(B)
+  (?n ?$,1 f(B)
+  (?N ?$,1 e(B))
  
  ;;; latin-alt.el ends here



reply via email to

[Prev in Thread] Current Thread [Next in Thread]