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