("latin-1-alt-postfix"): Add a method to enter the

small superscript underlined o and a.
("italian-alt-postfix"): Change it to something useful and
different from italian-postfix.

diff --git a/leim/quail/latin-alt.el b/leim/quail/latin-alt.el
index ff2e27490dc45922a6e69af0e920eae1f0153c48..2eae483e2dd928f53b783acd8873f946cddd91de 100644 (file)
--- a/leim/quail/latin-alt.el
+++ b/leim/quail/latin-alt.el
@@ -39,7 +39,8 @@
   tilde      |    ~    | a~ -> \e,Ac\e(B
   cedilla    |    /    | c/ -> \e,Ag\e(B
   nordic     |    /    | d/ -> \e,Ap\e(B   t/ -> \e,A~\e(B   a/ -> \e,Ae\e(B   e/ -> \e,Af\e(B   o/ -> \e,Ax\e(B
-  others     |   /<>   | s/ -> \e,A_\e(B   ?/ -> \e,A?\e(B   !/ -> \e,A!\e(B   << -> \e,A+\e(B   >> -> \e,A;\e(B
+  others     |   /<>   | s/ -> \e,A_\e(B   ?/ -> \e,A?\e(B   !/ -> \e,A!\e(B
+             | various | << -> \e,A+\e(B   >> -> \e,A;\e(B   o_ -> \e,A:\e(B   a_ -> \e,A*\e(B
 
 It would be natural to use comma for cedillas, but that would be
 inconvenient in practice because commas are needed very often after a
@@ -115,6 +116,8 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("!/" ?\e,A!\e(B)
  ("<<" ?\e,A+\e(B)
  (">>" ?\e,A;\e(B)
+ ("o_" ?\e,A:\e(B)
+ ("a_" ?\e,A*\e(B)
 
  ("A``" ["A`"])
  ("A''" ["A'"])
@@ -182,6 +185,8 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  ("!//" ["!/"])
  ("<<<" ["<<"])
  (">>>" [">>"])
+ ("o__" ["o_"])
+ ("a__" ["a_"])
  )
 
 (quail-define-package
@@ -1180,37 +1185,71 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
  "italian-alt-postfix" "Latin-1" "IT<" t
  "Italian (Italiano) input method with postfix modifiers
 
-A` -> \e,A@\e(B
-E` -> \e,AH\e(B
-I` -> \e,AL\e(B
-O` -> \e,AR\e(B
-U` -> \e,AY\e(B
+a' -> \e,Aa\e(B    A' -> \e,AA\e(B    a` -> \e,A`\e(B    A` -> \e,A@\e(B    i^ -> \e,An\e(B    << -> \e,A+\e(B
+e' -> \e,Ai\e(B    E' -> \e,AI\e(B    e` -> \e,Ah\e(B    E` -> \e,AH\e(B    I^ -> \e,AN\e(B    >> -> \e,A;\e(B
+i' -> \e,Am\e(B    I' -> \e,AM\e(B    i` -> \e,Al\e(B    I` -> \e,AL\e(B               o_ -> \e,A:\e(B
+o' -> \e,As\e(B    O' -> \e,AS\e(B    o` -> \e,Ar\e(B    O` -> \e,AR\e(B               a_ -> \e,A*\e(B
+u' -> \e,Az\e(B    U' -> \e,AZ\e(B    u` -> \e,Ay\e(B    U` -> \e,AY\e(B    
+
+This method is for purists who like accents the old way.
 
 Doubling the postfix separates the letter and postfix: e.g. a`` -> a`
 " nil t nil nil nil nil nil nil nil nil t)
 
 (quail-define-rules
  ("A`" ?\e,A@\e(B)
+ ("A'" ?\e,AA\e(B)
  ("a`" ?\e,A`\e(B)
+ ("a'" ?\e,Aa\e(B)
  ("E`" ?\e,AH\e(B)
+ ("E'" ?\e,AI\e(B)
  ("e`" ?\e,Ah\e(B)
+ ("e'" ?\e,Ai\e(B)
  ("I`" ?\e,AL\e(B)
  ("i`" ?\e,Al\e(B)
+ ("I'" ?\e,AM\e(B)
+ ("i'" ?\e,Am\e(B)
+ ("I^" ?\e,AN\e(B)
+ ("i^" ?\e,An\e(B)
  ("O`" ?\e,AR\e(B)
  ("o`" ?\e,Ar\e(B)
+ ("O'" ?\e,AS\e(B)
+ ("o'" ?\e,As\e(B)
  ("U`" ?\e,AY\e(B)
  ("u`" ?\e,Ay\e(B)
+ ("U'" ?\e,AZ\e(B)
+ ("u'" ?\e,Az\e(B)
+ ("<<" ?\e,A+\e(B)
+ (">>" ?\e,A;\e(B)
+ ("o_" ?\e,A:\e(B)
+ ("a_" ?\e,A*\e(B)
 
  ("A``" ["A`"])
+ ("A''" ["A'"])
  ("a``" ["a`"])
+ ("a''" ["a'"])
  ("E``" ["E`"])
+ ("E''" ["E'"])
  ("e``" ["e`"])
+ ("e''" ["e'"])
  ("I``" ["I`"])
  ("i``" ["i`"])
+ ("I''" ["I'"])
+ ("i''" ["i'"])
+ ("I^^" ["I^"])
+ ("i^^" ["i^"])
  ("O``" ["O`"])
  ("o``" ["o`"])
+ ("O''" ["O'"])
+ ("o''" ["o'"])
  ("U``" ["U`"])
  ("u``" ["u`"])
+ ("U''" ["U'"])
+ ("u''" ["u'"])
+ ("<<<" ["<<"])
+ (">>>" [">>"])
+ ("o__" ["o_"])
+ ("a__" ["a_"])
  )
 
 (quail-define-package