HCoop / bpt / emacs.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Some fixes to follow lisp coding conventions and typo fixes.
[bpt/emacs.git] / leim / quail / latin-alt.el
CommitLineData
be567141 1;;; latin-alt.el --- Quail packages for inputting various European characters
a2e1d90c
RS		 2
3;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
4;; Licensed to the Free Software Foundation.
5
6;; Keywords: multilingual, input method, latin
7
8;; This file is part of GNU Emacs.
9
10;; GNU Emacs is free software; you can redistribute it and/or modify
11;; it under the terms of the GNU General Public License as published by
12;; the Free Software Foundation; either version 2, or (at your option)
13;; any later version.
14
15;; GNU Emacs is distributed in the hope that it will be useful,
16;; but WITHOUT ANY WARRANTY; without even the implied warranty of
17;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18;; GNU General Public License for more details.
19
20;; You should have received a copy of the GNU General Public License
21;; along with GNU Emacs; see the file COPYING. If not, write to the
22;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
23;; Boston, MA 02111-1307, USA.
24
25;; Author: TAKAHASHI Naoto <ntakahas@etl.go.jp>
26
be567141
PJ		 27;;; Commentary:
28
29;;; Code:
30
a2e1d90c
RS		 31(require 'quail)
32
33(quail-define-package
34 "latin-1-alt-postfix" "Latin-1" "1<" t
35 "Latin-1 character input method with postfix modifiers
36
37 | postfix | examples
38 ------------+---------+----------
39 acute | ' | a' -> \e,Aa\e(B
40 grave | ` | a` -> \e,A`\e(B
41 circumflex | ^ | a^ -> \e,Ab\e(B
42 diaeresis | \" | a\" -> \e,Ad\e(B
43 tilde | ~ | a~ -> \e,Ac\e(B
44 cedilla | / | c/ -> \e,Ag\e(B
45 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
60b2cdb5
RS		 46 others | /<> | s/ -> \e,A_\e(B ?/ -> \e,A?\e(B !/ -> \e,A!\e(B
47 | various | << -> \e,A+\e(B >> -> \e,A;\e(B o_ -> \e,A:\e(B a_ -> \e,A*\e(B
a2e1d90c
RS		 48
49It would be natural to use comma for cedillas, but that would be
50inconvenient in practice because commas are needed very often after a
51letter.
52
53Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
54" nil t nil nil nil nil nil nil nil nil t)
55
56(quail-define-rules
57 ("A`" ?\e,A@\e(B)
58 ("A'" ?\e,AA\e(B)
59 ("A^" ?\e,AB\e(B)
60 ("A~" ?\e,AC\e(B)
61 ("A\"" ?\e,AD\e(B)
62 ("A/" ?\e,AE\e(B)
63 ("a`" ?\e,A`\e(B)
64 ("a'" ?\e,Aa\e(B)
65 ("a^" ?\e,Ab\e(B)
66 ("a~" ?\e,Ac\e(B)
67 ("a\"" ?\e,Ad\e(B)
68 ("a/" ?\e,Ae\e(B)
69 ("E`" ?\e,AH\e(B)
70 ("E'" ?\e,AI\e(B)
71 ("E^" ?\e,AJ\e(B)
72 ("E\"" ?\e,AK\e(B)
73 ("E/" ?\e,AF\e(B)
74 ("e`" ?\e,Ah\e(B)
75 ("e'" ?\e,Ai\e(B)
76 ("e^" ?\e,Aj\e(B)
77 ("e\"" ?\e,Ak\e(B)
78 ("e/" ?\e,Af\e(B)
79 ("I`" ?\e,AL\e(B)
80 ("i`" ?\e,Al\e(B)
81 ("I'" ?\e,AM\e(B)
82 ("i'" ?\e,Am\e(B)
83 ("I^" ?\e,AN\e(B)
84 ("i^" ?\e,An\e(B)
85 ("I\"" ?\e,AO\e(B)
86 ("i\"" ?\e,Ao\e(B)
87 ("O`" ?\e,AR\e(B)
88 ("o`" ?\e,Ar\e(B)
89 ("O'" ?\e,AS\e(B)
90 ("o'" ?\e,As\e(B)
91 ("O^" ?\e,AT\e(B)
92 ("o^" ?\e,At\e(B)
93 ("O~" ?\e,AU\e(B)
94 ("o~" ?\e,Au\e(B)
95 ("O\"" ?\e,AV\e(B)
96 ("o\"" ?\e,Av\e(B)
97 ("O/" ?\e,AX\e(B)
98 ("o/" ?\e,Ax\e(B)
99 ("U`" ?\e,AY\e(B)
100 ("u`" ?\e,Ay\e(B)
101 ("U'" ?\e,AZ\e(B)
102 ("u'" ?\e,Az\e(B)
103 ("U^" ?\e,A[\e(B)
104 ("u^" ?\e,A{\e(B)
105 ("U\"" ?\e,A\\e(B)
106 ("u\"" ?\e,A|\e(B)
107 ("Y'" ?\e,A]\e(B)
108 ("y'" ?\e,A}\e(B)
109 ("y\"" ?\e,A\7f\e(B)
110 ("D/" ?\e,AP\e(B)
111 ("d/" ?\e,Ap\e(B)
112 ("T/" ?\e,A^\e(B)
113 ("t/" ?\e,A~\e(B)
114 ("s/" ?\e,A_\e(B)
115 ("C/" ?\e,AG\e(B)
116 ("c/" ?\e,Ag\e(B)
117 ("N~" ?\e,AQ\e(B)
118 ("n~" ?\e,Aq\e(B)
119 ("?/" ?\e,A?\e(B)
120 ("!/" ?\e,A!\e(B)
121 ("<<" ?\e,A+\e(B)
122 (">>" ?\e,A;\e(B)
60b2cdb5
RS		 123 ("o_" ?\e,A:\e(B)
124 ("a_" ?\e,A*\e(B)
a2e1d90c
RS		 125
126 ("A``" ["A`"])
127 ("A''" ["A'"])
128 ("A^^" ["A^"])
129 ("A~~" ["A~"])
130 ("A\"\"" ["A\""])
131 ("A//" ["A/"])
132 ("a``" ["a`"])
133 ("a''" ["a'"])
134 ("a^^" ["a^"])
135 ("a~~" ["a~"])
136 ("a\"\"" ["a\""])
137 ("a//" ["a/"])
138 ("E``" ["E`"])
139 ("E''" ["E'"])
140 ("E^^" ["E^"])
141 ("E\"\"" ["E\""])
142 ("E//" ["E/"])
143 ("e``" ["e`"])
144 ("e''" ["e'"])
145 ("e^^" ["e^"])
146 ("e\"\"" ["e\""])
147 ("e//" ["e/"])
148 ("I``" ["I`"])
149 ("i``" ["i`"])
150 ("I''" ["I'"])
151 ("i''" ["i'"])
152 ("I^^" ["I^"])
153 ("i^^" ["i^"])
154 ("I\"\"" ["I\""])
155 ("i\"\"" ["i\""])
156 ("O``" ["O`"])
157 ("o``" ["o`"])
158 ("O''" ["O'"])
159 ("o''" ["o'"])
160 ("O^^" ["O^"])
161 ("o^^" ["o^"])
162 ("O~~" ["O~"])
163 ("o~~" ["o~"])
164 ("O\"\"" ["O\""])
165 ("o\"\"" ["o\""])
166 ("O//" ["O/"])
167 ("o//" ["o/"])
168 ("U``" ["U`"])
169 ("u``" ["u`"])
170 ("U''" ["U'"])
171 ("u''" ["u'"])
172 ("U^^" ["U^"])
173 ("u^^" ["u^"])
174 ("U\"\"" ["U\""])
175 ("u\"\"" ["u\""])
176 ("Y''" ["Y'"])
177 ("y''" ["y'"])
178 ("y\"\"" ["y\""])
179 ("D//" ["D/"])
180 ("d//" ["d/"])
181 ("T//" ["T/"])
182 ("t//" ["t/"])
183 ("s//" ["s/"])
184 ("C//" ["C/"])
185 ("c//" ["c/"])
186 ("N~~" ["N~"])
187 ("n~~" ["n~"])
188 ("?//" ["?/"])
189 ("!//" ["!/"])
190 ("<<<" ["<<"])
191 (">>>" [">>"])
60b2cdb5
RS		 192 ("o__" ["o_"])
193 ("a__" ["a_"])
a2e1d90c
RS		 194 )
195
196(quail-define-package
197 "latin-2-alt-postfix" "Latin-2" "2<" t
198 "Latin-2 character input method with postfix modifiers
199
200 | postfix | examples
201 ------------+---------+----------
202 acute | ' | a' -> \e,Ba\e(B
203 ogonek | ` | a` -> \e,B1\e(B
204 diaeresis | \" | a\" -> \e,Bd\e(B
205 circumflex | ^ | a^ -> \e,Bb\e(B
206 breve | ~ | a~ -> \e,Bc\e(B
207 cedilla | ` | c` -> \e,Bg\e(B
208 caron | ~ | c~ -> \e,Bh\e(B
d9f86f8f 209 dbl. acute | : | o: -> \e,Bu\e(B
a2e1d90c
RS		 210 ring | ` | u` -> \e,By\e(B
211 dot | ` | z` -> \e,B?\e(B
212 stroke | / | d/ -> \e,Bp\e(B
213 others | / | s/ -> \e,B_\e(B
214
215It would be natural to use period and comma for dots/rings and
216cedillas/ogoneks, but that would inconvenient in practice, because
217periods and commas are needed very often after a letter.
218
219Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
220" nil t nil nil nil nil nil nil nil nil t)
221
222(quail-define-rules
223 ("A'" ?\e,BA\e(B)
224 ("A`" ?\e,B!\e(B)
225 ("A\"" ?\e,BD\e(B)
226 ("A^" ?\e,BB\e(B)
227 ("A~" ?\e,BC\e(B)
228 ("C'" ?\e,BF\e(B)
229 ("C`" ?\e,BG\e(B)
230 ("C~" ?\e,BH\e(B)
231 ("D/" ?\e,BP\e(B)
232 ("D~" ?\e,BO\e(B)
233 ("E'" ?\e,BI\e(B)
234 ("E`" ?\e,BJ\e(B)
235 ("E\"" ?\e,BK\e(B)
236 ("E~" ?\e,BL\e(B)
237 ("I'" ?\e,BM\e(B)
238 ("I^" ?\e,BN\e(B)
239 ("L'" ?\e,BE\e(B)
240 ("L/" ?\e,B#\e(B)
241 ("L~" ?\e,B%\e(B)
242 ("N'" ?\e,BQ\e(B)
243 ("N~" ?\e,BR\e(B)
244 ("O'" ?\e,BS\e(B)
1f68db67 245 ("O:" ?\e,BU\e(B)
a2e1d90c
RS		 246 ("O\"" ?\e,BV\e(B)
247 ("O^" ?\e,BT\e(B)
248 ("R'" ?\e,B@\e(B)
249 ("R~" ?\e,BX\e(B)
250 ("S'" ?\e,B&\e(B)
251 ("S`" ?\e,B*\e(B)
252 ("S~" ?\e,B)\e(B)
253 ("T`" ?\e,B^\e(B)
254 ("T~" ?\e,B+\e(B)
255 ("U'" ?\e,BZ\e(B)
1f68db67 256 ("U:" ?\e,B[\e(B)
a2e1d90c
RS		 257 ("U\"" ?\e,B\\e(B)
258 ("U`" ?\e,BY\e(B)
259 ("Y'" ?\e,B]\e(B)
260 ("Z'" ?\e,B,\e(B)
261 ("Z`" ?\e,B/\e(B)
262 ("Z~" ?\e,B.\e(B)
263 ("a'" ?\e,Ba\e(B)
264 ("a`" ?\e,B1\e(B)
265 ("a\"" ?\e,Bd\e(B)
266 ("a^" ?\e,Bb\e(B)
267 ("a~" ?\e,Bc\e(B)
268 ("c'" ?\e,Bf\e(B)
269 ("c`" ?\e,Bg\e(B)
270 ("c~" ?\e,Bh\e(B)
271 ("d/" ?\e,Bp\e(B)
272 ("d~" ?\e,Bo\e(B)
273 ("e'" ?\e,Bi\e(B)
274 ("e`" ?\e,Bj\e(B)
275 ("e\"" ?\e,Bk\e(B)
276 ("e~" ?\e,Bl\e(B)
277 ("i'" ?\e,Bm\e(B)
278 ("i^" ?\e,Bn\e(B)
279 ("l'" ?\e,Be\e(B)
280 ("l/" ?\e,B3\e(B)
281 ("l~" ?\e,B5\e(B)
282 ("n'" ?\e,Bq\e(B)
283 ("n~" ?\e,Br\e(B)
284 ("o'" ?\e,Bs\e(B)
1f68db67 285 ("o:" ?\e,Bu\e(B)
a2e1d90c
RS		 286 ("o\"" ?\e,Bv\e(B)
287 ("o^" ?\e,Bt\e(B)
288 ("r'" ?\e,B`\e(B)
289 ("r~" ?\e,Bx\e(B)
290 ("s'" ?\e,B6\e(B)
291 ("s`" ?\e,B:\e(B)
292 ("s/" ?\e,B_\e(B)
293 ("s~" ?\e,B9\e(B)
294 ("t`" ?\e,B~\e(B)
295 ("t~" ?\e,B;\e(B)
296 ("u'" ?\e,Bz\e(B)
1f68db67 297 ("u:" ?\e,B{\e(B)
a2e1d90c
RS		 298 ("u\"" ?\e,B|\e(B)
299 ("u`" ?\e,By\e(B)
300 ("y'" ?\e,B}\e(B)
301 ("z'" ?\e,B<\e(B)
302 ("z`" ?\e,B?\e(B)
303 ("z~" ?\e,B>\e(B)
304
305 ("A''" ["A'"])
306 ("A``" ["A`"])
307 ("A\"\"" ["A\""])
308 ("A^^" ["A^"])
309 ("A~~" ["A~"])
310 ("C''" ["C'"])
311 ("C``" ["C`"])
312 ("C~~" ["C~"])
313 ("D//" ["D/"])
314 ("D~~" ["D~"])
315 ("E''" ["E'"])
316 ("E``" ["E`"])
317 ("E\"\"" ["E\""])
318 ("E~~" ["E~"])
319 ("I''" ["I'"])
320 ("I^^" ["I^"])
321 ("L''" ["L'"])
322 ("L//" ["L/"])
323 ("L~~" ["L~"])
324 ("N''" ["N'"])
325 ("N~~" ["N~"])
326 ("O''" ["O'"])
327 ("O::" ["O:"])
328 ("O\"\"" ["O\""])
329 ("O^^" ["O^"])
330 ("R''" ["R'"])
331 ("R~~" ["R~"])
332 ("S''" ["S'"])
333 ("S``" ["S`"])
334 ("S~~" ["S~"])
335 ("T``" ["T`"])
336 ("T~~" ["T~"])
337 ("U''" ["U'"])
338 ("U::" ["U:"])
339 ("U\"\"" ["U\""])
340 ("U``" ["U`"])
341 ("Y''" ["Y'"])
342 ("Z''" ["Z'"])
343 ("Z``" ["Z`"])
344 ("Z~~" ["Z~"])
345 ("a''" ["a'"])
346 ("a``" ["a`"])
347 ("a\"\"" ["a\""])
348 ("a^^" ["a^"])
349 ("a~~" ["a~"])
350 ("c''" ["c'"])
351 ("c``" ["c`"])
352 ("c~~" ["c~"])
353 ("d//" ["d/"])
354 ("d~~" ["d~"])
355 ("e''" ["e'"])
356 ("e``" ["e`"])
357 ("e\"\"" ["e\""])
358 ("e~~" ["e~"])
359 ("i''" ["i'"])
360 ("i^^" ["i^"])
361 ("l''" ["l'"])
362 ("l//" ["l/"])
363 ("l~~" ["l~"])
364 ("n''" ["n'"])
365 ("n~~" ["n~"])
366 ("o''" ["o'"])
367 ("o::" ["o:"])
368 ("o\"\"" ["o\""])
369 ("o^^" ["o^"])
370 ("r''" ["r'"])
371 ("r~~" ["r~"])
372 ("s''" ["s'"])
373 ("s``" ["s`"])
374 ("s//" ["s/"])
375 ("s~~" ["s~"])
376 ("t``" ["t`"])
377 ("t~~" ["t~"])
378 ("u''" ["u'"])
379 ("u::" ["u:"])
380 ("u\"\"" ["u\""])
381 ("u``" ["u`"])
382 ("y''" ["y'"])
383 ("z''" ["z'"])
384 ("z``" ["z`"])
385 ("z~~" ["z~"])
386 )
387
388(quail-define-package
389 "latin-3-alt-postfix" "Latin-3" "3<" t
390 "Latin-3 character input method with postfix modifiers
391
392 | postfix | examples
393 ------------+---------+----------
394 acute | ' | a' -> \e,Ca\e(B
395 grave | ` | a` -> \e,C`\e(B
396 circumflex | ^ | a^ -> \e,Cb\e(B
397 diaeresis | \" | a\" -> \e,Cd\e(B
398 dot | / | c/ -> \e,Ce\e(B i/ -> \e,C9\e(B I/ -> \e,C)\e(B
399 cedilla | ` | c` -> \e,Cg\e(B
400 breve | ~ | g~ -> \e,C;\e(B
401 tilde | ~ | n~ -> \e,Cq\e(B
402 stroke | / | h/ -> \e,C1\e(B
403 others | / | s/ -> \e,C_\e(B
404
405It would be natural to use period and comma for dots and cedillas, but
406that would inconvenient in practice, because periods and commas are
407needed very often after a letter.
408
409Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
410" nil t nil nil nil nil nil nil nil nil t)
411
412(quail-define-rules
413 ("A`" ?\e,C@\e(B)
414 ("A'" ?\e,CA\e(B)
415 ("A^" ?\e,CB\e(B)
416 ("A\"" ?\e,CD\e(B)
417 ("C/" ?\e,CE\e(B)
418 ("C^" ?\e,CF\e(B)
419 ("C`" ?\e,CG\e(B)
420 ("E`" ?\e,CH\e(B)
421 ("E'" ?\e,CI\e(B)
422 ("E^" ?\e,CJ\e(B)
423 ("E\"" ?\e,CK\e(B)
424 ("G~" ?\e,C+\e(B)
425 ("G/" ?\e,CU\e(B)
426 ("G^" ?\e,CX\e(B)
427 ("H/" ?\e,C!\e(B)
428 ("H^" ?\e,C&\e(B)
429 ("I/" ?\e,C)\e(B)
430 ("I`" ?\e,CL\e(B)
431 ("I'" ?\e,CM\e(B)
432 ("I^" ?\e,CN\e(B)
433 ("I\"" ?\e,CO\e(B)
434 ("J^" ?\e,C,\e(B)
435 ("N~" ?\e,CQ\e(B)
436 ("O`" ?\e,CR\e(B)
437 ("O'" ?\e,CS\e(B)
438 ("O^" ?\e,CT\e(B)
439 ("O\"" ?\e,CV\e(B)
440 ("S`" ?\e,C*\e(B)
441 ("S^" ?\e,C^\e(B)
442 ("U`" ?\e,CY\e(B)
443 ("U'" ?\e,CZ\e(B)
444 ("U^" ?\e,C[\e(B)
445 ("U\"" ?\e,C\\e(B)
446 ("U~" ?\e,C]\e(B)
447 ("Z/" ?\e,C/\e(B)
448 ("a`" ?\e,C`\e(B)
449 ("a'" ?\e,Ca\e(B)
450 ("a^" ?\e,Cb\e(B)
451 ("a\"" ?\e,Cd\e(B)
452 ("c/" ?\e,Ce\e(B)
453 ("c^" ?\e,Cf\e(B)
454 ("c`" ?\e,Cg\e(B)
455 ("e`" ?\e,Ch\e(B)
456 ("e'" ?\e,Ci\e(B)
457 ("e^" ?\e,Cj\e(B)
458 ("e\"" ?\e,Ck\e(B)
459 ("g~" ?\e,C;\e(B)
460 ("g/" ?\e,Cu\e(B)
461 ("g^" ?\e,Cx\e(B)
462 ("h/" ?\e,C1\e(B)
463 ("h^" ?\e,C6\e(B)
464 ("i/" ?\e,C9\e(B)
465 ("i`" ?\e,Cl\e(B)
466 ("i'" ?\e,Cm\e(B)
467 ("i^" ?\e,Cn\e(B)
468 ("i\"" ?\e,Co\e(B)
469 ("j^" ?\e,C<\e(B)
470 ("n~" ?\e,Cq\e(B)
471 ("o`" ?\e,Cr\e(B)
472 ("o'" ?\e,Cs\e(B)
473 ("o^" ?\e,Ct\e(B)
474 ("o\"" ?\e,Cv\e(B)
475 ("s`" ?\e,C:\e(B)
476 ("s/" ?\e,C_\e(B)
477 ("s^" ?\e,C~\e(B)
478 ("u`" ?\e,Cy\e(B)
479 ("u'" ?\e,Cz\e(B)
480 ("u^" ?\e,C{\e(B)
481 ("u\"" ?\e,C|\e(B)
482 ("u~" ?\e,C}\e(B)
483 ("z/" ?\e,C?\e(B)
484
485 ("A``" ["A`"])
486 ("A''" ["A'"])
487 ("A^^" ["A^"])
488 ("A\"\"" ["A\""])
489 ("C//" ["C/"])
490 ("C^^" ["C^"])
491 ("C``" ["C`"])
492 ("E``" ["E`"])
493 ("E''" ["E'"])
494 ("E^^" ["E^"])
495 ("E\"\"" ["E\""])
496 ("G~~" ["G~"])
497 ("G//" ["G/"])
498 ("G^^" ["G^"])
499 ("H//" ["H/"])
500 ("H^^" ["H^"])
501 ("I//" ["I/"])
502 ("I``" ["I`"])
503 ("I''" ["I'"])
504 ("I^^" ["I^"])
505 ("I\"\"" ["I\""])
506 ("J^^" ["J^"])
507 ("N~~" ["N~"])
508 ("O``" ["O`"])
509 ("O''" ["O'"])
510 ("O^^" ["O^"])
511 ("O\"\"" ["O\""])
512 ("S``" ["S`"])
513 ("S^^" ["S^"])
514 ("U``" ["U`"])
515 ("U''" ["U'"])
516 ("U^^" ["U^"])
517 ("U\"\"" ["U\""])
518 ("U~~" ["U~"])
519 ("Z//" ["Z/"])
520 ("a``" ["a`"])
521 ("a''" ["a'"])
522 ("a^^" ["a^"])
523 ("a\"\"" ["a\""])
524 ("c//" ["c/"])
525 ("c^^" ["c^"])
526 ("c``" ["c`"])
527 ("e``" ["e`"])
528 ("e''" ["e'"])
529 ("e^^" ["e^"])
530 ("e\"\"" ["e\""])
531 ("g~~" ["g~"])
532 ("g//" ["g/"])
533 ("g^^" ["g^"])
534 ("h//" ["h/"])
535 ("h^^" ["h^"])
536 ("i//" ["i/"])
537 ("i``" ["i`"])
538 ("i''" ["i'"])
539 ("i^^" ["i^"])
540 ("i\"\"" ["i\""])
541 ("j^^" ["j^"])
542 ("n~~" ["n~"])
543 ("o``" ["o`"])
544 ("o''" ["o'"])
545 ("o^^" ["o^"])
546 ("o\"\"" ["o\""])
547 ("s``" ["s`"])
548 ("s//" ["s/"])
549 ("s^^" ["s^"])
550 ("u``" ["u`"])
551 ("u''" ["u'"])
552 ("u^^" ["u^"])
553 ("u\"\"" ["u\""])
554 ("u~~" ["u~"])
555 ("z//" ["z/"])
556 )
557
558(quail-define-package
559 "latin-4-alt-postfix" "Latin-4" "4<" t
560 "Latin-4 characters input method with postfix modifiers
561
562 | postfix | examples
563 ------------+---------+----------
564 acute | ' | a' -> \e,Da\e(B
565 circumflex | ^ | a^ -> \e,Db\e(B
566 diaeresis | \" | a\" -> \e,Dd\e(B
567 ogonek | ` | a` -> \e,D1\e(B
568 macron | - | a- -> \e,D`\e(B
569 tilde | ~ | a~ -> \e,Dc\e(B
570 caron | ~ | c~ -> \e,Dh\e(B
571 dot | ~ | e~ -> \e,Dl\e(B
572 cedilla | ` | k` -> \e,Ds\e(B g` -> \e,D;\e(B
573 stroke | / | d/ -> \e,Dp\e(B
574 nordic | / | a/ -> \e,De\e(B e/ -> \e,Df\e(B o/ -> \e,Dx\e(B
575 others | / | s/ -> \e,D_\e(B n/ -> \e,D?\e(B k/ -> \e,D"\e(B
576
577It would be natural to use period and comma for dots and
578cedillas/ogoneks, but that would inconvenient in practice, because
579periods and commas are needed very often after a letter.
580
581Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
582" nil t nil nil nil nil nil nil nil nil t)
583
584(quail-define-rules
585 ("A`" ?\e,D!\e(B)
586 ("A-" ?\e,D@\e(B)
587 ("A'" ?\e,DA\e(B)
588 ("A^" ?\e,DB\e(B)
589 ("A~" ?\e,DC\e(B)
590 ("A\"" ?\e,DD\e(B)
591 ("A/" ?\e,DE\e(B)
592 ("C~" ?\e,DH\e(B)
593 ("D/" ?\e,DP\e(B)
594 ("E/" ?\e,DF\e(B)
595 ("E-" ?\e,D*\e(B)
596 ("E'" ?\e,DI\e(B)
597 ("E`" ?\e,DJ\e(B)
598 ("E\"" ?\e,DK\e(B)
599 ("E~" ?\e,DL\e(B)
600 ("G`" ?\e,D+\e(B)
601 ("I~" ?\e,D%\e(B)
602 ("I`" ?\e,DG\e(B)
603 ("I'" ?\e,DM\e(B)
604 ("I^" ?\e,DN\e(B)
605 ("I-" ?\e,DO\e(B)
606 ("K`" ?\e,DS\e(B)
607 ("L`" ?\e,D&\e(B)
608 ("N/" ?\e,D=\e(B)
609 ("N`" ?\e,DQ\e(B)
610 ("O-" ?\e,DR\e(B)
611 ("O^" ?\e,DT\e(B)
612 ("O~" ?\e,DU\e(B)
613 ("O\"" ?\e,DV\e(B)
614 ("O/" ?\e,DX\e(B)
615 ("R`" ?\e,D#\e(B)
616 ("S~" ?\e,D)\e(B)
617 ("T/" ?\e,D,\e(B)
618 ("U`" ?\e,DY\e(B)
619 ("U'" ?\e,DZ\e(B)
620 ("U^" ?\e,D[\e(B)
621 ("U\"" ?\e,D\\e(B)
622 ("U~" ?\e,D]\e(B)
623 ("U-" ?\e,D^\e(B)
624 ("Z~" ?\e,D.\e(B)
625 ("a`" ?\e,D1\e(B)
626 ("a-" ?\e,D`\e(B)
627 ("a'" ?\e,Da\e(B)
628 ("a^" ?\e,Db\e(B)
629 ("a~" ?\e,Dc\e(B)
630 ("a\"" ?\e,Dd\e(B)
631 ("a/" ?\e,De\e(B)
632 ("c~" ?\e,Dh\e(B)
633 ("d/" ?\e,Dp\e(B)
634 ("e/" ?\e,Df\e(B)
635 ("e-" ?\e,D:\e(B)
636 ("e'" ?\e,Di\e(B)
637 ("e`" ?\e,Dj\e(B)
638 ("e\"" ?\e,Dk\e(B)
639 ("e~" ?\e,Dl\e(B)
640 ("g`" ?\e,D;\e(B)
641 ("i~" ?\e,D5\e(B)
642 ("i`" ?\e,Dg\e(B)
643 ("i'" ?\e,Dm\e(B)
644 ("i^" ?\e,Dn\e(B)
645 ("i-" ?\e,Do\e(B)
646 ("k/" ?\e,D"\e(B)
647 ("k`" ?\e,Ds\e(B)
648 ("l`" ?\e,D6\e(B)
649 ("n/" ?\e,D?\e(B)
650 ("n`" ?\e,Dq\e(B)
651 ("o-" ?\e,Dr\e(B)
652 ("o^" ?\e,Dt\e(B)
653 ("o~" ?\e,Du\e(B)
654 ("o\"" ?\e,Dv\e(B)
655 ("o/" ?\e,Dx\e(B)
656 ("r`" ?\e,D3\e(B)
657 ("s/" ?\e,D_\e(B)
658 ("s~" ?\e,D9\e(B)
659 ("t/" ?\e,D<\e(B)
660 ("u`" ?\e,Dy\e(B)
661 ("u'" ?\e,Dz\e(B)
662 ("u^" ?\e,D{\e(B)
663 ("u\"" ?\e,D|\e(B)
664 ("u~" ?\e,D}\e(B)
665 ("u-" ?\e,D~\e(B)
666 ("z~" ?\e,D>\e(B)
667
668 ("A``" ["A`"])
669 ("A--" ["A-"])
670 ("A''" ["A'"])
671 ("A^^" ["A^"])
672 ("A~~" ["A~"])
673 ("A\"\"" ["A\""])
674 ("A//" ["A/"])
675 ("C~~" ["C~"])
676 ("D//" ["D/"])
677 ("E//" ["E/"])
678 ("E--" ["E-"])
679 ("E''" ["E'"])
680 ("E``" ["E`"])
681 ("E\"\"" ["E\""])
682 ("E~~" ["E~"])
683 ("G``" ["G`"])
684 ("I~~" ["I~"])
685 ("I``" ["I`"])
686 ("I''" ["I'"])
687 ("I^^" ["I^"])
688 ("I--" ["I-"])
689 ("K``" ["K`"])
690 ("L``" ["L`"])
691 ("N//" ["N/"])
692 ("N``" ["N`"])
693 ("O--" ["O-"])
694 ("O^^" ["O^"])
695 ("O~~" ["O~"])
696 ("O\"\"" ["O\""])
697 ("O//" ["O/"])
698 ("R``" ["R`"])
699 ("S~~" ["S~"])
700 ("T//" ["T/"])
701 ("U``" ["U`"])
702 ("U''" ["U'"])
703 ("U^^" ["U^"])
704 ("U\"\"" ["U\""])
705 ("U~~" ["U~"])
706 ("U--" ["U-"])
707 ("Z~~" ["Z~"])
708 ("a``" ["a`"])
709 ("a--" ["a-"])
710 ("a''" ["a'"])
711 ("a^^" ["a^"])
712 ("a~~" ["a~"])
713 ("a\"\"" ["a\""])
714 ("a//" ["a/"])
715 ("c~~" ["c~"])
716 ("d//" ["d/"])
717 ("e//" ["e/"])
718 ("e--" ["e-"])
719 ("e''" ["e'"])
720 ("e``" ["e`"])
721 ("e\"\"" ["e\""])
722 ("e~~" ["e~"])
723 ("g``" ["g`"])
724 ("i~~" ["i~"])
725 ("i``" ["i`"])
726 ("i''" ["i'"])
727 ("i^^" ["i^"])
728 ("i--" ["i-"])
729 ("k//" ["k/"])
730 ("k``" ["k`"])
731 ("l``" ["l`"])
732 ("n//" ["n/"])
733 ("n``" ["n`"])
734 ("o--" ["o-"])
735 ("o^^" ["o^"])
736 ("o~~" ["o~"])
737 ("o\"\"" ["o\""])
738 ("o//" ["o/"])
739 ("r``" ["r`"])
740 ("s//" ["s/"])
741 ("s~~" ["s~"])
742 ("t//" ["t/"])
743 ("u``" ["u`"])
744 ("u''" ["u'"])
745 ("u^^" ["u^"])
746 ("u\"\"" ["u\""])
747 ("u~~" ["u~"])
748 ("u--" ["u-"])
749 ("z~~" ["z~"])
750 )
751
752(quail-define-package
753 "latin-5-alt-postfix" "Latin-5" "5<" t
754 "Latin-5 characters input method with postfix modifiers
755
756 | postfix | examples
757 ------------+---------+----------
758 acute | ' | a' -> \e,Ma\e(B
759 grave | ` | a` -> \e,M`\e(B
760 circumflex | ^ | a^ -> \e,Mb\e(B
761 diaeresis | \" | a\" -> \e,Md\e(B
762 tilde | ~ | a~ -> \e,Mc\e(B
763 breve | ~ | g~ -> \e,Mp\e(B
764 cedilla | ` | c` -> \e,Mg\e(B
765 dot | / | i/ -> \e,M}\e(B I/ -> \e,M]\e(B
766 nordic | / | a/ -> \e,Me\e(B e/ -> \e,Mf\e(B o/ -> \e,Mx\e(B
767 others | / | s/ -> \e,M_\e(B
768
769It would be natural to use period and comma for dots and cedillas, but
770that would inconvenient in practice, because periods and commas are
771needed very often after a letter.
772
773Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
774" nil t nil nil nil nil nil nil nil nil t)
775
776(quail-define-rules
777 ("A'" ?\e,MA\e(B)
778 ("A/" ?\e,ME\e(B)
779 ("A\"" ?\e,MD\e(B)
780 ("A^" ?\e,MB\e(B)
781 ("A`" ?\e,M@\e(B)
782 ("A~" ?\e,MC\e(B)
783 ("C`" ?\e,MG\e(B)
784 ("E'" ?\e,MI\e(B)
785 ("E/" ?\e,MF\e(B)
786 ("E\"" ?\e,MK\e(B)
787 ("E^" ?\e,MJ\e(B)
788 ("E`" ?\e,MH\e(B)
789 ("G~" ?\e,MP\e(B)
790 ("I'" ?\e,MM\e(B)
791 ("I/" ?\e,M]\e(B)
792 ("I\"" ?\e,MO\e(B)
793 ("I^" ?\e,MN\e(B)
794 ("I`" ?\e,ML\e(B)
795 ("N~" ?\e,MQ\e(B)
796 ("O'" ?\e,MS\e(B)
797 ("O/" ?\e,MX\e(B)
798 ("O\"" ?\e,MV\e(B)
799 ("O^" ?\e,MT\e(B)
800 ("O`" ?\e,MR\e(B)
801 ("O~" ?\e,MU\e(B)
802 ("S`" ?\e,M^\e(B)
803 ("U'" ?\e,MZ\e(B)
804 ("U\"" ?\e,M\\e(B)
805 ("U^" ?\e,M[\e(B)
806 ("U`" ?\e,MY\e(B)
807 ("a'" ?\e,Ma\e(B)
808 ("a/" ?\e,Me\e(B)
809 ("a\"" ?\e,Md\e(B)
810 ("a^" ?\e,Mb\e(B)
811 ("a`" ?\e,M`\e(B)
812 ("a~" ?\e,Mc\e(B)
813 ("c`" ?\e,Mg\e(B)
814 ("e'" ?\e,Mi\e(B)
815 ("e/" ?\e,Mf\e(B)
816 ("e\"" ?\e,Mk\e(B)
817 ("e^" ?\e,Mj\e(B)
818 ("e`" ?\e,Mh\e(B)
819 ("g~" ?\e,Mp\e(B)
820 ("i'" ?\e,Mm\e(B)
821 ("i/" ?\e,M}\e(B)
822 ("i\"" ?\e,Mo\e(B)
823 ("i^" ?\e,Mn\e(B)
824 ("i`" ?\e,Ml\e(B)
825 ("n~" ?\e,Mq\e(B)
826 ("o'" ?\e,Ms\e(B)
827 ("o/" ?\e,Mx\e(B)
828 ("o\"" ?\e,Mv\e(B)
829 ("o^" ?\e,Mt\e(B)
830 ("o`" ?\e,Mr\e(B)
831 ("o~" ?\e,Mu\e(B)
832 ("s`" ?\e,M~\e(B)
833 ("s/" ?\e,M_\e(B)
834 ("u'" ?\e,Mz\e(B)
835 ("u\"" ?\e,M|\e(B)
836 ("u^" ?\e,M{\e(B)
837 ("u`" ?\e,My\e(B)
838 ("y\"" ?\e,M\7f\e(B)
839
840 ("A''" ["A'"])
841 ("A//" ["A/"])
842 ("A\"\"" ["A\""])
843 ("A^^" ["A^"])
844 ("A``" ["A`"])
845 ("A~~" ["A~"])
846 ("C``" ["C`"])
847 ("E''" ["E'"])
848 ("E//" ["E/"])
849 ("E\"\"" ["E\""])
850 ("E^^" ["E^"])
851 ("E``" ["E`"])
852 ("G~~" ["G~"])
853 ("I''" ["I'"])
854 ("I//" ["I/"])
855 ("I\"\"" ["I\""])
856 ("I^^" ["I^"])
857 ("I``" ["I`"])
858 ("N~~" ["N~"])
859 ("O''" ["O'"])
860 ("O//" ["O/"])
861 ("O\"\"" ["O\""])
862 ("O^^" ["O^"])
863 ("O``" ["O`"])
864 ("O~~" ["O~"])
865 ("S``" ["S`"])
866 ("U''" ["U'"])
867 ("U\"\"" ["U\""])
868 ("U^^" ["U^"])
869 ("U``" ["U`"])
870 ("a''" ["a'"])
871 ("a//" ["a/"])
872 ("a\"\"" ["a\""])
873 ("a^^" ["a^"])
874 ("a``" ["a`"])
875 ("a~~" ["a~"])
876 ("c``" ["c`"])
877 ("e''" ["e'"])
878 ("e//" ["e/"])
879 ("e\"\"" ["e\""])
880 ("e^^" ["e^"])
881 ("e``" ["e`"])
882 ("g~~" ["g~"])
883 ("i''" ["i'"])
884 ("i//" ["i/"])
885 ("i\"\"" ["i\""])
886 ("i^^" ["i^"])
887 ("i``" ["i`"])
888 ("n~~" ["n~"])
889 ("o''" ["o'"])
890 ("o//" ["o/"])
891 ("o\"\"" ["o\""])
892 ("o^^" ["o^"])
893 ("o``" ["o`"])
894 ("o~~" ["o~"])
895 ("s``" ["s`"])
896 ("s//" ["s/"])
897 ("u''" ["u'"])
898 ("u\"\"" ["u\""])
899 ("u^^" ["u^"])
900 ("u``" ["u`"])
901 ("y\"\"" ["y\""])
902 )
903
904(quail-define-package
905 "danish-alt-postfix" "Latin-1" "DA<" t
906 "Danish input method (rule: AE -> \e,AF\e(B, OE -> \e,AX\e(B, AA -> \e,AE\e(B, E' -> \e,AI\e(B)
907
908Doubling the postfix separates the letter and postfix: e.g. aee -> ae
909"
910 nil t nil nil nil nil nil nil nil nil t)
911
912(quail-define-rules
913 ("AE" ?\e,AF\e(B)
914 ("ae" ?\e,Af\e(B)
915 ("OE" ?\e,AX\e(B)
916 ("oe" ?\e,Ax\e(B)
917 ("AA" ?\e,AE\e(B)
918 ("aa" ?\e,Ae\e(B)
919 ("E'" ?\e,AI\e(B)
920 ("e'" ?\e,Ai\e(B)
921
922 ("AEE" ["AE"])
923 ("aee" ["ae"])
924 ("OEE" ["OE"])
925 ("oee" ["oe"])
926 ("AAA" ["AA"])
927 ("aaa" ["aa"])
928 ("E''" ["E'"])
929 ("e''" ["e'"])
930 )
931
932(quail-define-package
933 "esperanto-alt-postfix" "Latin-3" "EO<" t
934 "Esperanto input method with postfix modifiers
935
936A following ^ or x will produce an accented character,
4b825385 937e.g. c^ -> \e,Cf\e(B gx -> \e,Cx\e(B u^ -> \e,C}\e(B.
a2e1d90c
RS		 938
939Doubling the postfix separates the letter and postfix,
940e.g. a'' -> a'.
941" nil t nil nil nil nil nil nil nil nil t)
942
943(quail-define-rules
944 ("Cx" ?\e,CF\e(B)
945 ("C^" ?\e,CF\e(B)
946 ("cx" ?\e,Cf\e(B)
947 ("c^" ?\e,Cf\e(B)
948 ("Gx" ?\e,CX\e(B)
949 ("G^" ?\e,CX\e(B)
950 ("gx" ?\e,Cx\e(B)
951 ("g^" ?\e,Cx\e(B)
952 ("Hx" ?\e,C&\e(B)
953 ("H^" ?\e,C&\e(B)
954 ("hx" ?\e,C6\e(B)
955 ("h^" ?\e,C6\e(B)
956 ("Jx" ?\e,C,\e(B)
957 ("J^" ?\e,C,\e(B)
958 ("jx" ?\e,C<\e(B)
959 ("j^" ?\e,C<\e(B)
960 ("Sx" ?\e,C^\e(B)
961 ("S^" ?\e,C^\e(B)
962 ("sx" ?\e,C~\e(B)
963 ("s^" ?\e,C~\e(B)
964 ("Ux" ?\e,C]\e(B)
965 ("U^" ?\e,C]\e(B)
966 ("ux" ?\e,C}\e(B)
967 ("u^" ?\e,C}\e(B)
968
969 ("Cxx" ["Cx"])
970 ("C^^" ["C^"])
971 ("cxx" ["cx"])
972 ("c^^" ["c^"])
973 ("Gxx" ["Gx"])
974 ("G^^" ["G^"])
975 ("gxx" ["gx"])
976 ("g^^" ["g^"])
977 ("Hxx" ["Hx"])
978 ("H^^" ["H^"])
979 ("hxx" ["hx"])
980 ("h^^" ["h^"])
981 ("Jxx" ["Jx"])
982 ("J^^" ["J^"])
983 ("jxx" ["jx"])
984 ("j^^" ["j^"])
985 ("Sxx" ["Sx"])
986 ("S^^" ["S^"])
987 ("sxx" ["sx"])
988 ("s^^" ["s^"])
989 ("Uxx" ["Ux"])
990 ("U^^" ["U^"])
991 ("uxx" ["ux"])
992 ("u^^" ["u^"])
993 )
994
995(quail-define-package
996 "finnish-alt-postfix" "Latin-1" "FI<" t
997 "Finnish (Suomi) input method
998
999AE -> \e,AD\e(B
1000AEE -> AE
1001OE -> \e,AV\e(B
1002OEE -> OE
1003"
1004 nil t nil nil nil nil nil nil nil nil t)
1005
1006(quail-define-rules
1007 ("AE" ?\e,AD\e(B)
1008 ("ae" ?\e,Ad\e(B)
1009 ("OE" ?\e,AV\e(B)
1010 ("oe" ?\e,Av\e(B)
1011
1012 ("AEE" ["AE"])
1013 ("aee" ["ae"])
1014 ("OEE" ["OE"])
1015 ("oee" ["oe"])
1016 )
1017
1018(quail-define-package
1019 "french-alt-postfix" "Latin-1" "FR<" t
1020 "French (Fran\e,Ag\e(Bais) input method with postfix modifiers
1021
1022` pour grave, ' pour aigu, ^ pour circonflexe, et \" pour tr\e,Ai\e(Bma.
4b825385 1023Par exemple: a` -> \e,A`\e(B e' -> \e,Ai\e(B.
a2e1d90c
RS		 1024
1025\e,AG\e(B, \e,A+\e(B, et \e,A;\e(B sont produits par C/, <<, et >>.
1026
1027En doublant la frappe des diacritiques, ils s'isoleront de la lettre.
1028Par exemple: e'' -> e'
1029
1030<e dans l'o> n'est pas disponible."
1031 nil t nil nil nil nil nil nil nil nil t)
1032
1033(quail-define-rules
1034 ("A`" ?\e,A@\e(B)
1035 ("A^" ?\e,AB\e(B)
1036 ("a`" ?\e,A`\e(B)
1037 ("a^" ?\e,Ab\e(B)
1038 ("E`" ?\e,AH\e(B)
1039 ("E'" ?\e,AI\e(B)
1040 ("E^" ?\e,AJ\e(B)
1041 ("E\"" ?\e,AK\e(B)
1042 ("e`" ?\e,Ah\e(B)
1043 ("e'" ?\e,Ai\e(B)
1044 ("e^" ?\e,Aj\e(B)
1045 ("e\"" ?\e,Ak\e(B)
1046 ("I^" ?\e,AN\e(B)
1047 ("I\"" ?\e,AO\e(B)
1048 ("i^" ?\e,An\e(B)
1049 ("i\"" ?\e,Ao\e(B)
1050 ("O^" ?\e,AT\e(B)
1051 ("o^" ?\e,At\e(B)
1052 ("U`" ?\e,AY\e(B)
1053 ("U^" ?\e,A[\e(B)
1054 ("U\"" ?\e,A\\e(B)
1055 ("u`" ?\e,Ay\e(B)
1056 ("u^" ?\e,A{\e(B)
1057 ("u\"" ?\e,A|\e(B)
1058 ("C/" ?\e,AG\e(B)
1059 ("c/" ?\e,Ag\e(B)
1060 ("<<" ?\e,A+\e(B)
1061 (">>" ?\e,A;\e(B)
1062
1063 ("A``" ["A`"])
1064 ("A^^" ["A^"])
1065 ("a``" ["a`"])
1066 ("a^^" ["a^"])
1067 ("E``" ["E`"])
1068 ("E''" ["E'"])
1069 ("E^^" ["E^"])
1070 ("E\"\"" ["E\""])
1071 ("e``" ["e`"])
1072 ("e''" ["e'"])
1073 ("e^^" ["e^"])
1074 ("e\"\"" ["e\""])
1075 ("I^^" ["I^"])
1076 ("I\"\"" ["I\""])
1077 ("i^^" ["i^"])
1078 ("i\"\"" ["i\""])
1079 ("O^^" ["O^"])
1080 ("o^^" ["o^"])
1081 ("U``" ["U`"])
1082 ("U^^" ["U^"])
1083 ("U\"\"" ["U\""])
1084 ("u``" ["u`"])
1085 ("u^^" ["u^"])
1086 ("u\"\"" ["u\""])
1087 ("C//" ["C/"])
1088 ("c//" ["c/"])
1089 ("<<<" ["<<"])
1090 (">>>" [">>"])
1091 )
1092
1093(quail-define-package
1094 "german-alt-postfix" "Latin-1" "DE<" t
1095 "German (Deutsch) input method
1096
1097ae -> \e,Ad\e(B
1098aee -> ae
1099oe -> \e,Av\e(B
1100oee -> oe
1101ue -> \e,A|\e(B
1102uee -> ue
1103sz -> \e,A_\e(B
1104szz -> sz
1105"
1106 nil t nil nil nil nil nil nil nil nil t)
1107
1108(quail-define-rules
1109 ("AE" ?\e,AD\e(B)
1110 ("ae" ?\e,Ad\e(B)
1111 ("OE" ?\e,AV\e(B)
1112 ("oe" ?\e,Av\e(B)
1113 ("UE" ?\e,A\\e(B)
1114 ("ue" ?\e,A|\e(B)
1115 ("sz" ?\e,A_\e(B)
1116
1117 ("AEE" ["AE"])
1118 ("aee" ["ae"])
1119 ("OEE" ["OE"])
1120 ("oee" ["oe"])
1121 ("UEE" ["UE"])
1122 ("uee" ["ue"])
1123 ("szz" ["sz"])
1124 )
1125
1126(quail-define-package
1127 "icelandic-alt-postfix" "Latin-1" "IS<" t
1128 "Icelandic (\e,AM\e(Bslenska) input method with postfix modifiers
1129
1130A' -> \e,AA\e(B
1131E' -> \e,AI\e(B
1132I' -> \e,AM\e(B
1133O' -> \e,AS\e(B
1134U' -> \e,AZ\e(B
1135Y' -> \e,A]\e(B
1136AE -> \e,AF\e(B
1137OE -> \e,AV\e(B
1138D/ -> \e,AP\e(B (eth)
1139T/ -> \e,A^\e(B (thorn)
1140
1141Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
1142" nil t nil nil nil nil nil nil nil nil t)
1143
1144(quail-define-rules
1145 ("A'" ?\e,AA\e(B)
1146 ("a'" ?\e,Aa\e(B)
1147 ("E'" ?\e,AI\e(B)
1148 ("e'" ?\e,Ai\e(B)
1149 ("I'" ?\e,AM\e(B)
1150 ("i'" ?\e,Am\e(B)
1151 ("O'" ?\e,AS\e(B)
1152 ("o'" ?\e,As\e(B)
1153 ("U'" ?\e,AZ\e(B)
1154 ("u'" ?\e,Az\e(B)
1155 ("Y'" ?\e,A]\e(B)
1156 ("y'" ?\e,A}\e(B)
1157 ("AE" ?\e,AF\e(B)
1158 ("ae" ?\e,Af\e(B)
1159 ("OE" ?\e,AV\e(B)
1160 ("oe" ?\e,Av\e(B)
1161 ("D/" ?\e,AP\e(B)
1162 ("d/" ?\e,Ap\e(B)
1163 ("T/" ?\e,A^\e(B)
1164 ("t/" ?\e,A~\e(B)
1165
1166 ("A''" ["A'"])
1167 ("a''" ["a'"])
1168 ("E''" ["E'"])
1169 ("e''" ["e'"])
1170 ("I''" ["I'"])
1171 ("i''" ["i'"])
1172 ("O''" ["O'"])
1173 ("o''" ["o'"])
1174 ("U''" ["U'"])
1175 ("u''" ["u'"])
1176 ("Y''" ["Y'"])
1177 ("y''" ["y'"])
1178 ("AEE" ["AE"])
1179 ("aee" ["ae"])
1180 ("OEE" ["OE"])
1181 ("oee" ["oe"])
1182 ("D//" ["D/"])
1183 ("d//" ["d/"])
1184 ("T//" ["T/"])
1185 ("t//" ["t/"])
1186 )
1187
1188(quail-define-package
1189 "italian-alt-postfix" "Latin-1" "IT<" t
1190 "Italian (Italiano) input method with postfix modifiers
1191
60b2cdb5
RS		 1192a' -> \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
1193e' -> \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
1194i' -> \e,Am\e(B I' -> \e,AM\e(B i` -> \e,Al\e(B I` -> \e,AL\e(B o_ -> \e,A:\e(B
1195o' -> \e,As\e(B O' -> \e,AS\e(B o` -> \e,Ar\e(B O` -> \e,AR\e(B a_ -> \e,A*\e(B
1196u' -> \e,Az\e(B U' -> \e,AZ\e(B u` -> \e,Ay\e(B U` -> \e,AY\e(B
1197
1198This method is for purists who like accents the old way.
a2e1d90c
RS		 1199
1200Doubling the postfix separates the letter and postfix: e.g. a`` -> a`
1201" nil t nil nil nil nil nil nil nil nil t)
1202
1203(quail-define-rules
1204 ("A`" ?\e,A@\e(B)
60b2cdb5 1205 ("A'" ?\e,AA\e(B)
a2e1d90c 1206 ("a`" ?\e,A`\e(B)
60b2cdb5 1207 ("a'" ?\e,Aa\e(B)
a2e1d90c 1208 ("E`" ?\e,AH\e(B)
60b2cdb5 1209 ("E'" ?\e,AI\e(B)
a2e1d90c 1210 ("e`" ?\e,Ah\e(B)
60b2cdb5 1211 ("e'" ?\e,Ai\e(B)
a2e1d90c
RS		 1212 ("I`" ?\e,AL\e(B)
1213 ("i`" ?\e,Al\e(B)
60b2cdb5
RS		 1214 ("I'" ?\e,AM\e(B)
1215 ("i'" ?\e,Am\e(B)
1216 ("I^" ?\e,AN\e(B)
1217 ("i^" ?\e,An\e(B)
a2e1d90c
RS		 1218 ("O`" ?\e,AR\e(B)
1219 ("o`" ?\e,Ar\e(B)
60b2cdb5
RS		 1220 ("O'" ?\e,AS\e(B)
1221 ("o'" ?\e,As\e(B)
a2e1d90c
RS		 1222 ("U`" ?\e,AY\e(B)
1223 ("u`" ?\e,Ay\e(B)
60b2cdb5
RS		 1224 ("U'" ?\e,AZ\e(B)
1225 ("u'" ?\e,Az\e(B)
1226 ("<<" ?\e,A+\e(B)
1227 (">>" ?\e,A;\e(B)
1228 ("o_" ?\e,A:\e(B)
1229 ("a_" ?\e,A*\e(B)
a2e1d90c
RS		 1230
1231 ("A``" ["A`"])
60b2cdb5 1232 ("A''" ["A'"])
a2e1d90c 1233 ("a``" ["a`"])
60b2cdb5 1234 ("a''" ["a'"])
a2e1d90c 1235 ("E``" ["E`"])
60b2cdb5 1236 ("E''" ["E'"])
a2e1d90c 1237 ("e``" ["e`"])
60b2cdb5 1238 ("e''" ["e'"])
a2e1d90c
RS		 1239 ("I``" ["I`"])
1240 ("i``" ["i`"])
60b2cdb5
RS		 1241 ("I''" ["I'"])
1242 ("i''" ["i'"])
1243 ("I^^" ["I^"])
1244 ("i^^" ["i^"])
a2e1d90c
RS		 1245 ("O``" ["O`"])
1246 ("o``" ["o`"])
60b2cdb5
RS		 1247 ("O''" ["O'"])
1248 ("o''" ["o'"])
a2e1d90c
RS		 1249 ("U``" ["U`"])
1250 ("u``" ["u`"])
60b2cdb5
RS		 1251 ("U''" ["U'"])
1252 ("u''" ["u'"])
1253 ("<<<" ["<<"])
1254 (">>>" [">>"])
1255 ("o__" ["o_"])
1256 ("a__" ["a_"])
a2e1d90c
RS		 1257 )
1258
1259(quail-define-package
1260 "norwegian-alt-postfix" "Latin-1" "NO<" t
1261 "Norwegian (Norsk) input method (rule: AE->\e,AF\e(B, OE->\e,AX\e(B, AA->\e,AE\e(B, E'->\e,AI\e(B)
1262
1263Doubling the postfix separates the letter and postfix: e.g. aee -> ae
1264"
1265 nil t nil nil nil nil nil nil nil nil t)
1266
1267(quail-define-rules
1268 ("AE" ?\e,AF\e(B)
1269 ("ae" ?\e,Af\e(B)
1270 ("OE" ?\e,AX\e(B)
1271 ("oe" ?\e,Ax\e(B)
1272 ("AA" ?\e,AE\e(B)
1273 ("aa" ?\e,Ae\e(B)
1274 ("E'" ?\e,AI\e(B)
1275 ("e'" ?\e,Ai\e(B)
1276
1277 ("AEE" ["AE"])
1278 ("aee" ["ae"])
1279 ("OEE" ["OE"])
1280 ("oee" ["oe"])
1281 ("AAA" ["AA"])
1282 ("aaa" ["aa"])
1283 ("E''" ["E'"])
1284 ("e''" ["e'"])
1285 )
1286
1287(quail-define-package
1288 "scandinavian-alt-postfix" "Latin-1" "SC<" t
1289 "Scandinavian input method with postfix modifiers
1290Supported languages are Swidish, Norwegian, Danish, and Finnish.
1291
1292ae -> \e,Af\e(B
1293oe -> \e,Ax\e(B
1294aa -> \e,Ae\e(B
1295a\" -> \e,Ad\e(B
1296o\" -> \e,Av\e(B
1297e' -> \e,Ai\e(B
1298
1299Doubling the postfix separates the letter and postfix:
4b825385 1300aee -> ae o\"\" -> o\" etc.
a2e1d90c
RS		 1301" nil t nil nil nil nil nil nil nil nil t)
1302
1303(quail-define-rules
1304 ("AE" ?\e,AF\e(B)
1305 ("ae" ?\e,Af\e(B)
1306 ("OE" ?\e,AX\e(B)
1307 ("oe" ?\e,Ax\e(B)
1308 ("AA" ?\e,AE\e(B)
1309 ("aa" ?\e,Ae\e(B)
1310 ("A\"" ?\e,AD\e(B)
1311 ("a\"" ?\e,Ad\e(B)
1312 ("O\"" ?\e,AV\e(B)
1313 ("o\"" ?\e,Av\e(B)
1314 ("E'" ?\e,AI\e(B)
1315 ("e'" ?\e,Ai\e(B)
1316
1317 ("AEE" ["AE"])
1318 ("aee" ["ae"])
1319 ("OEE" ["OE"])
1320 ("oee" ["oe"])
1321 ("AAA" ["AA"])
1322 ("aaa" ["aa"])
1323 ("A\"\"" ["A\""])
1324 ("a\"\"" ["a\""])
1325 ("O\"\"" ["O\""])
1326 ("o\"\"" ["o\""])
1327 ("E''" ["E'"])
1328 ("e''" ["e'"])
1329 )
1330
1331(quail-define-package
1332 "spanish-alt-postfix" "Latin-1" "ES<" t
1333 "Spanish (Espa\e,Aq\e(Bol) input method with postfix modifiers
1334
1335A' -> \e,AA\e(B
1336E' -> \e,AI\e(B
1337I' -> \e,AM\e(B
1338O' -> \e,AS\e(B
1339U' -> \e,AZ\e(B
1340N~ -> \e,AQ\e(B
1341!/ -> \e,A!\e(B
1342?/ -> \e,A?\e(B
1343
1344Doubling the postfix separates the letter and postfix:
4b825385 1345a'' -> a' n~~ -> n~, etc.
a2e1d90c
RS		 1346" nil t nil nil nil nil nil nil nil nil t)
1347
1348(quail-define-rules
1349 ("A'" ?\e,AA\e(B)
1350 ("a'" ?\e,Aa\e(B)
1351 ("E'" ?\e,AI\e(B)
1352 ("e'" ?\e,Ai\e(B)
1353 ("I'" ?\e,AM\e(B)
1354 ("i'" ?\e,Am\e(B)
1355 ("O'" ?\e,AS\e(B)
1356 ("o'" ?\e,As\e(B)
1357 ("U'" ?\e,AZ\e(B)
1358 ("u'" ?\e,Az\e(B)
1359 ("N~" ?\e,AQ\e(B)
1360 ("n~" ?\e,Aq\e(B)
1361 ("?/" ?\e,A?\e(B)
1362 ("!/" ?\e,A!\e(B)
1363
1364 ("A''" ["A'"])
1365 ("a''" ["a'"])
1366 ("E''" ["E'"])
1367 ("e''" ["e'"])
1368 ("I''" ["I'"])
1369 ("i''" ["i'"])
1370 ("O''" ["O'"])
1371 ("o''" ["o'"])
1372 ("U''" ["U'"])
1373 ("u''" ["u'"])
1374 ("N~~" ["N~"])
1375 ("n~~" ["n~"])
1376 ("?//" ["?/"])
1377 ("!//" ["!/"])
1378 )
1379
1380(quail-define-package
1381 "swedish-alt-postfix" "Latin-1" "SV<" t
1382 "Swedish (Svenska) input method (rule: AA -> \e,AE\e(B, AE -> \e,AD\e(B, OE -> \e,AV\e(B, E' -> \e,AI\e(B)
1383
1384Doubling the postfix separates the letter and postfix: e.g. aee -> ae
1385" nil t nil nil nil nil nil nil nil nil t)
1386
1387(quail-define-rules
1388 ("AA" ?\e,AE\e(B)
1389 ("aa" ?\e,Ae\e(B)
1390 ("AE" ?\e,AD\e(B)
1391 ("ae" ?\e,Ad\e(B)
1392 ("OE" ?\e,AV\e(B)
1393 ("oe" ?\e,Av\e(B)
1394 ("E'" ?\e,AI\e(B)
1395 ("e'" ?\e,Ai\e(B)
1396
1397 ("AAA" ["AA"])
1398 ("aaa" ["aa"])
1399 ("AEE" ["AE"])
1400 ("aee" ["ae"])
1401 ("OEE" ["OE"])
1402 ("oee" ["oe"])
1403 ("E''" ["E'"])
1404 ("e''" ["e'"])
1405 )
1406
1407(quail-define-package
325ed6e6 1408 "turkish-latin-3-alt-postfix" "Latin-3" "TR3<<" t
4b825385 1409 "Turkish (T\e,C|\e(Brk\e,Cg\e(Be) input method with postfix modifiers.
a2e1d90c 1410
325ed6e6 1411This is for those who use Latin-3 (ISO-8859-3) for Turkish. If you
4b825385 1412use Latin-5 (ISO-8859-9), you should use \"turkish-alt-postfix\" instead.
325ed6e6 1413
a2e1d90c
RS		 1414Note for I, \e,C9\e(B, \e,C)\e(B, i.
1415
1416A^ -> \e,CB\e(B
1417C` -> \e,CG\e(B
1418G^ -> \e,C+\e(B
1419I -> I
1420i -> \e,C9\e(B
1421I/ -> \e,C)\e(B
1422i/ -> i
1423O\" -> \e,CV\e(B
1424S` -> \e,C*\e(B
1425U\" -> \e,C\\e(B
1426U^ -> \e,C[\e(B
1427
1428Doubling the postfix separates the letter and postfix: e.g. a^^ -> a^
1429" nil t nil nil nil nil nil nil nil nil t)
1430
1431(quail-define-rules
1432 ("A^" ?\e,CB\e(B)
1433 ("a^" ?\e,Cb\e(B)
1434 ("C`" ?\e,CG\e(B)
1435 ("c`" ?\e,Cg\e(B)
1436 ("G^" ?\e,C+\e(B)
1437 ("g^" ?\e,C;\e(B)
1438 ("I/" ?\e,C)\e(B)
1439 ("i" ?\e,C9\e(B)
1440 ("i/" ?i)
1441 ("O\"" ?\e,CV\e(B)
1442 ("o\"" ?\e,Cv\e(B)
1443 ("S`" ?\e,C*\e(B)
1444 ("s`" ?\e,C:\e(B)
1445 ("U\"" ?\e,C\\e(B)
1446 ("u\"" ?\e,C|\e(B)
1447 ("U^" ?\e,C[\e(B)
1448 ("u^" ?\e,C{\e(B)
1449
1450 ("A^^" ["A^"])
1451 ("a^^" ["a^"])
1452 ("C``" ["C`"])
1453 ("c``" ["c`"])
1454 ("G^^" ["G^"])
1455 ("g^^" ["g^"])
1456 ("I//" ["I/"])
1457 ("i" ["i"])
1458 ("i//" ["i/"])
1459 ("O\"\"" ["O\""])
1460 ("o\"\"" ["o\""])
1461 ("S``" ["S`"])
1462 ("s``" ["s`"])
1463 ("U\"\"" ["U\""])
1464 ("u\"\"" ["u\""])
1465 ("U^^" ["U^"])
1466 ("u^^" ["u^"])
1467 )
325ed6e6
KH		 1468
1469(quail-define-package
1470 "turkish-alt-postfix" "Latin-5" "TR\e,M+\e(B" t
4b825385 1471 "Turkish (T\e,M|\e(Brk\e,Mg\e(Be) input method with postfix modifiers.
325ed6e6
KH		 1472
1473This is for those who use Latin-5 (ISO-8859-9) for Turkish. If you
1474use Latin-3 (ISO-8859-3), you should use
4b825385 1475\"turkish-latin-3-alt-postfix\" instead.
325ed6e6
KH		 1476
1477Note for I, \e,M}\e(B, \e,M]\e(B, i.
1478
1479A^ -> \e,MB\e(B
1480C` -> \e,MG\e(B
1481G^ -> \e,MP\e(B
1482I -> I
1483i -> \e,M}\e(B
1484I/ -> \e,M]\e(B
1485i/ -> i
1486O\" -> \e,MV\e(B
1487S` -> \e,M^\e(B
1488U\" -> \e,M\\e(B
1489U^ -> \e,M[\e(B
1490
1491Doubling the postfix separates the letter and postfix: e.g. a^^ -> a^
1492" nil t nil nil nil nil nil nil nil nil t)
1493
1494(quail-define-rules
1495 ("A^" ?\e,MB\e(B)
1496 ("a^" ?\e,Mb\e(B)
1497 ("C`" ?\e,MG\e(B)
1498 ("c`" ?\e,Mg\e(B)
1499 ("G^" ?\e,MP\e(B)
1500 ("g^" ?\e,Mp\e(B)
1501 ("I/" ?\e,M]\e(B)
1502 ("i" ?\e,M}\e(B)
1503 ("i/" ?i)
1504 ("O\"" ?\e,MV\e(B)
1505 ("o\"" ?\e,Cv\e(B)
1506 ("S`" ?\e,M^\e(B)
1507 ("s`" ?\e,M~\e(B)
1508 ("U\"" ?\e,M\\e(B)
1509 ("u\"" ?\e,M|\e(B)
1510 ("U^" ?\e,M[\e(B)
1511 ("u^" ?\e,M{\e(B)
1512
1513 ("A^^" ["A^"])
1514 ("a^^" ["a^"])
1515 ("C``" ["C`"])
1516 ("c``" ["c`"])
1517 ("G^^" ["G^"])
1518 ("g^^" ["g^"])
1519 ("I//" ["I/"])
1520 ("i" ["i"])
1521 ("i//" ["i/"])
1522 ("O\"\"" ["O\""])
1523 ("o\"\"" ["o\""])
1524 ("S``" ["S`"])
1525 ("s``" ["s`"])
1526 ("U\"\"" ["U\""])
1527 ("u\"\"" ["u\""])
1528 ("U^^" ["U^"])
1529 ("u^^" ["u^"])
1530 )
be567141
PJ		 1531
1532;;; latin-alt.el ends here
Unnamed repository; edit this file 'description' to name the repository.