diff options
| author | Richard M. Stallman | 1998-10-13 15:41:11 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-10-13 15:41:11 +0000 |
| commit | 60b2cdb533bfbea2dfa592e7c0662c87e7e926cb (patch) | |
| tree | e7fd4f9ddc1fcc5ef6420810244c719a60b6b7db | |
| parent | 9769549bac7ebf3acdab9e45682756ce575ecda3 (diff) | |
| download | emacs-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.el | 51 |
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 | ||
| 44 | It would be natural to use comma for cedillas, but that would be | 45 | It would be natural to use comma for cedillas, but that would be |
| 45 | inconvenient in practice because commas are needed very often after a | 46 | 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' | |||
| 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 | ||
| 1183 | A` -> ,A@(B | 1188 | a' -> ,Aa(B A' -> ,AA(B a` -> ,A`(B A` -> ,A@(B i^ -> ,An(B << -> ,A+(B |
| 1184 | E` -> ,AH(B | 1189 | e' -> ,Ai(B E' -> ,AI(B e` -> ,Ah(B E` -> ,AH(B I^ -> ,AN(B >> -> ,A;(B |
| 1185 | I` -> ,AL(B | 1190 | i' -> ,Am(B I' -> ,AM(B i` -> ,Al(B I` -> ,AL(B o_ -> ,A:(B |
| 1186 | O` -> ,AR(B | 1191 | o' -> ,As(B O' -> ,AS(B o` -> ,Ar(B O` -> ,AR(B a_ -> ,A*(B |
| 1187 | U` -> ,AY(B | 1192 | u' -> ,Az(B U' -> ,AZ(B u` -> ,Ay(B U` -> ,AY(B |
| 1193 | |||
| 1194 | This method is for purists who like accents the old way. | ||
| 1188 | 1195 | ||
| 1189 | Doubling the postfix separates the letter and postfix: e.g. a`` -> a` | 1196 | Doubling 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 |