aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1998-10-13 15:41:11 +0000
committerRichard M. Stallman1998-10-13 15:41:11 +0000
commit60b2cdb533bfbea2dfa592e7c0662c87e7e926cb (patch)
treee7fd4f9ddc1fcc5ef6420810244c719a60b6b7db
parent9769549bac7ebf3acdab9e45682756ce575ecda3 (diff)
downloademacs-60b2cdb533bfbea2dfa592e7c0662c87e7e926cb.tar.gz
emacs-60b2cdb533bfbea2dfa592e7c0662c87e7e926cb.zip
("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.
-rw-r--r--leim/quail/latin-alt.el51
1 files changed, 45 insertions, 6 deletions
diff --git a/leim/quail/latin-alt.el b/leim/quail/latin-alt.el
index ff2e27490dc..2eae483e2dd 100644
--- a/leim/quail/latin-alt.el
+++ b/leim/quail/latin-alt.el
@@ -39,7 +39,8 @@
39 tilde | ~ | a~ -> ,Ac(B 39 tilde | ~ | a~ -> ,Ac(B
40 cedilla | / | c/ -> ,Ag(B 40 cedilla | / | c/ -> ,Ag(B
41 nordic | / | d/ -> ,Ap(B t/ -> ,A~(B a/ -> ,Ae(B e/ -> ,Af(B o/ -> ,Ax(B 41 nordic | / | d/ -> ,Ap(B t/ -> ,A~(B a/ -> ,Ae(B e/ -> ,Af(B o/ -> ,Ax(B
42 others | /<> | s/ -> ,A_(B ?/ -> ,A?(B !/ -> ,A!(B << -> ,A+(B >> -> ,A;(B 42 others | /<> | s/ -> ,A_(B ?/ -> ,A?(B !/ -> ,A!(B
43 | various | << -> ,A+(B >> -> ,A;(B o_ -> ,A:(B a_ -> ,A*(B
43 44
44It would be natural to use comma for cedillas, but that would be 45It would be natural to use comma for cedillas, but that would be
45inconvenient in practice because commas are needed very often after a 46inconvenient 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'
115 ("!/" ?,A!(B) 116 ("!/" ?,A!(B)
116 ("<<" ?,A+(B) 117 ("<<" ?,A+(B)
117 (">>" ?,A;(B) 118 (">>" ?,A;(B)
119 ("o_" ?,A:(B)
120 ("a_" ?,A*(B)
118 121
119 ("A``" ["A`"]) 122 ("A``" ["A`"])
120 ("A''" ["A'"]) 123 ("A''" ["A'"])
@@ -182,6 +185,8 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
182 ("!//" ["!/"]) 185 ("!//" ["!/"])
183 ("<<<" ["<<"]) 186 ("<<<" ["<<"])
184 (">>>" [">>"]) 187 (">>>" [">>"])
188 ("o__" ["o_"])
189 ("a__" ["a_"])
185 ) 190 )
186 191
187(quail-define-package 192(quail-define-package
@@ -1180,37 +1185,71 @@ Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
1180 "italian-alt-postfix" "Latin-1" "IT<" t 1185 "italian-alt-postfix" "Latin-1" "IT<" t
1181 "Italian (Italiano) input method with postfix modifiers 1186 "Italian (Italiano) input method with postfix modifiers
1182 1187
1183A` -> ,A@(B 1188a' -> ,Aa(B A' -> ,AA(B a` -> ,A`(B A` -> ,A@(B i^ -> ,An(B << -> ,A+(B
1184E` -> ,AH(B 1189e' -> ,Ai(B E' -> ,AI(B e` -> ,Ah(B E` -> ,AH(B I^ -> ,AN(B >> -> ,A;(B
1185I` -> ,AL(B 1190i' -> ,Am(B I' -> ,AM(B i` -> ,Al(B I` -> ,AL(B o_ -> ,A:(B
1186O` -> ,AR(B 1191o' -> ,As(B O' -> ,AS(B o` -> ,Ar(B O` -> ,AR(B a_ -> ,A*(B
1187U` -> ,AY(B 1192u' -> ,Az(B U' -> ,AZ(B u` -> ,Ay(B U` -> ,AY(B
1193
1194This method is for purists who like accents the old way.
1188 1195
1189Doubling the postfix separates the letter and postfix: e.g. a`` -> a` 1196Doubling the postfix separates the letter and postfix: e.g. a`` -> a`
1190" nil t nil nil nil nil nil nil nil nil t) 1197" nil t nil nil nil nil nil nil nil nil t)
1191 1198
1192(quail-define-rules 1199(quail-define-rules
1193 ("A`" ?,A@(B) 1200 ("A`" ?,A@(B)
1201 ("A'" ?,AA(B)
1194 ("a`" ?,A`(B) 1202 ("a`" ?,A`(B)
1203 ("a'" ?,Aa(B)
1195 ("E`" ?,AH(B) 1204 ("E`" ?,AH(B)
1205 ("E'" ?,AI(B)
1196 ("e`" ?,Ah(B) 1206 ("e`" ?,Ah(B)
1207 ("e'" ?,Ai(B)
1197 ("I`" ?,AL(B) 1208 ("I`" ?,AL(B)
1198 ("i`" ?,Al(B) 1209 ("i`" ?,Al(B)
1210 ("I'" ?,AM(B)
1211 ("i'" ?,Am(B)
1212 ("I^" ?,AN(B)
1213 ("i^" ?,An(B)
1199 ("O`" ?,AR(B) 1214 ("O`" ?,AR(B)
1200 ("o`" ?,Ar(B) 1215 ("o`" ?,Ar(B)
1216 ("O'" ?,AS(B)
1217 ("o'" ?,As(B)
1201 ("U`" ?,AY(B) 1218 ("U`" ?,AY(B)
1202 ("u`" ?,Ay(B) 1219 ("u`" ?,Ay(B)
1220 ("U'" ?,AZ(B)
1221 ("u'" ?,Az(B)
1222 ("<<" ?,A+(B)
1223 (">>" ?,A;(B)
1224 ("o_" ?,A:(B)
1225 ("a_" ?,A*(B)
1203 1226
1204 ("A``" ["A`"]) 1227 ("A``" ["A`"])
1228 ("A''" ["A'"])
1205 ("a``" ["a`"]) 1229 ("a``" ["a`"])
1230 ("a''" ["a'"])
1206 ("E``" ["E`"]) 1231 ("E``" ["E`"])
1232 ("E''" ["E'"])
1207 ("e``" ["e`"]) 1233 ("e``" ["e`"])
1234 ("e''" ["e'"])
1208 ("I``" ["I`"]) 1235 ("I``" ["I`"])
1209 ("i``" ["i`"]) 1236 ("i``" ["i`"])
1237 ("I''" ["I'"])
1238 ("i''" ["i'"])
1239 ("I^^" ["I^"])
1240 ("i^^" ["i^"])
1210 ("O``" ["O`"]) 1241 ("O``" ["O`"])
1211 ("o``" ["o`"]) 1242 ("o``" ["o`"])
1243 ("O''" ["O'"])
1244 ("o''" ["o'"])
1212 ("U``" ["U`"]) 1245 ("U``" ["U`"])
1213 ("u``" ["u`"]) 1246 ("u``" ["u`"])
1247 ("U''" ["U'"])
1248 ("u''" ["u'"])
1249 ("<<<" ["<<"])
1250 (">>>" [">>"])
1251 ("o__" ["o_"])
1252 ("a__" ["a_"])
1214 ) 1253 )
1215 1254
1216(quail-define-package 1255(quail-define-package