Mercurial > emacs
annotate leim/quail/latin-alt.el @ 80507:65aec0fc638d
Docstring change.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Sat, 12 Apr 2008 05:17:39 +0000 |
parents | 3ca83a726835 |
children | 606f2d163a64 |
rev | line source |
---|---|
42320 | 1 ;;; latin-alt.el --- Quail package for inputting various European characters -*-coding: iso-2022-7bit;-*- |
19901 | 2 |
79727 | 3 ;; Copyright (C) 1997, 1998, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008 |
75253
f5f322eb227f
Update copyright for years from Emacs 21 to present.
Glenn Morris <rgm@gnu.org>
parents:
74605
diff
changeset
|
4 ;; Free Software Foundation, Inc. |
79727 | 5 ;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008 |
67657 | 6 ;; National Institute of Advanced Industrial Science and Technology (AIST) |
7 ;; Registration Number H14PRO021 | |
19901 | 8 |
9 ;; Keywords: multilingual, input method, latin | |
10 | |
11 ;; This file is part of GNU Emacs. | |
12 | |
13 ;; GNU Emacs is free software; you can redistribute it and/or modify | |
14 ;; it under the terms of the GNU General Public License as published by | |
78308
126deea128b3
Restore comma mistakenly removed in last change.
Glenn Morris <rgm@gnu.org>
parents:
78303
diff
changeset
|
15 ;; the Free Software Foundation; either version 3, or (at your option) |
19901 | 16 ;; any later version. |
17 | |
18 ;; GNU Emacs is distributed in the hope that it will be useful, | |
19 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
20 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
21 ;; GNU General Public License for more details. | |
22 | |
23 ;; You should have received a copy of the GNU General Public License | |
24 ;; along with GNU Emacs; see the file COPYING. If not, write to the | |
64083 | 25 ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
26 ;; Boston, MA 02110-1301, USA. | |
19901 | 27 |
79568 | 28 ;; Author (of latin-post.el): TAKAHASHI Naoto <ntakahas@etl.go.jp> |
19901 | 29 |
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
34937
diff
changeset
|
30 ;;; Commentary: |
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
34937
diff
changeset
|
31 |
79568 | 32 ;; These input methods differ from those in latin-post.el |
33 ;; in that comma is not special (use / instead), | |
34 ;; and // is not special either (so you can enter a slash | |
35 ;; by typing //). | |
36 | |
37 ;; At least, that's what I could see by comparing the first few | |
38 ;; of these with latin-post.el. | |
39 | |
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
34937
diff
changeset
|
40 ;;; Code: |
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
34937
diff
changeset
|
41 |
19901 | 42 (require 'quail) |
43 | |
44 (quail-define-package | |
45 "latin-1-alt-postfix" "Latin-1" "1<" t | |
46 "Latin-1 character input method with postfix modifiers | |
79568 | 47 This input method differs from `latin-1-postfix' in that |
48 comma is not special (use slash instead), and `//' is not | |
49 special (so you can use that to enter a slash). | |
19901 | 50 |
51 | postfix | examples | |
52 ------------+---------+---------- | |
53 acute | ' | a' -> ,Aa(B | |
54 grave | ` | a` -> ,A`(B | |
55 circumflex | ^ | a^ -> ,Ab(B | |
56 diaeresis | \" | a\" -> ,Ad(B | |
57 tilde | ~ | a~ -> ,Ac(B | |
58 cedilla | / | c/ -> ,Ag(B | |
59 nordic | / | d/ -> ,Ap(B t/ -> ,A~(B a/ -> ,Ae(B e/ -> ,Af(B o/ -> ,Ax(B | |
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
60 others | /<> | s/ -> ,A_(B ?/ -> ,A?(B !/ -> ,A!(B |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
61 | various | << -> ,A+(B >> -> ,A;(B o_ -> ,A:(B a_ -> ,A*(B |
19901 | 62 |
79568 | 63 It seems natural to use comma for cedillas, but that is |
64 inconvenient in practice because commas are needed very | |
65 often after a letter. | |
19901 | 66 |
67 Doubling the postfix separates the letter and postfix: e.g. a'' -> a' | |
68 " nil t nil nil nil nil nil nil nil nil t) | |
69 | |
70 (quail-define-rules | |
71 ("A`" ?,A@(B) | |
72 ("A'" ?,AA(B) | |
73 ("A^" ?,AB(B) | |
74 ("A~" ?,AC(B) | |
75 ("A\"" ?,AD(B) | |
76 ("A/" ?,AE(B) | |
77 ("a`" ?,A`(B) | |
78 ("a'" ?,Aa(B) | |
79 ("a^" ?,Ab(B) | |
80 ("a~" ?,Ac(B) | |
81 ("a\"" ?,Ad(B) | |
82 ("a/" ?,Ae(B) | |
83 ("E`" ?,AH(B) | |
84 ("E'" ?,AI(B) | |
85 ("E^" ?,AJ(B) | |
86 ("E\"" ?,AK(B) | |
87 ("E/" ?,AF(B) | |
88 ("e`" ?,Ah(B) | |
89 ("e'" ?,Ai(B) | |
90 ("e^" ?,Aj(B) | |
91 ("e\"" ?,Ak(B) | |
92 ("e/" ?,Af(B) | |
93 ("I`" ?,AL(B) | |
94 ("i`" ?,Al(B) | |
95 ("I'" ?,AM(B) | |
96 ("i'" ?,Am(B) | |
97 ("I^" ?,AN(B) | |
98 ("i^" ?,An(B) | |
99 ("I\"" ?,AO(B) | |
100 ("i\"" ?,Ao(B) | |
101 ("O`" ?,AR(B) | |
102 ("o`" ?,Ar(B) | |
103 ("O'" ?,AS(B) | |
104 ("o'" ?,As(B) | |
105 ("O^" ?,AT(B) | |
106 ("o^" ?,At(B) | |
107 ("O~" ?,AU(B) | |
108 ("o~" ?,Au(B) | |
109 ("O\"" ?,AV(B) | |
110 ("o\"" ?,Av(B) | |
111 ("O/" ?,AX(B) | |
112 ("o/" ?,Ax(B) | |
113 ("U`" ?,AY(B) | |
114 ("u`" ?,Ay(B) | |
115 ("U'" ?,AZ(B) | |
116 ("u'" ?,Az(B) | |
117 ("U^" ?,A[(B) | |
118 ("u^" ?,A{(B) | |
119 ("U\"" ?,A\(B) | |
120 ("u\"" ?,A|(B) | |
121 ("Y'" ?,A](B) | |
122 ("y'" ?,A}(B) | |
123 ("y\"" ?,A(B) | |
124 ("D/" ?,AP(B) | |
125 ("d/" ?,Ap(B) | |
126 ("T/" ?,A^(B) | |
127 ("t/" ?,A~(B) | |
128 ("s/" ?,A_(B) | |
129 ("C/" ?,AG(B) | |
130 ("c/" ?,Ag(B) | |
131 ("N~" ?,AQ(B) | |
132 ("n~" ?,Aq(B) | |
133 ("?/" ?,A?(B) | |
134 ("!/" ?,A!(B) | |
135 ("<<" ?,A+(B) | |
136 (">>" ?,A;(B) | |
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
137 ("o_" ?,A:(B) |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
138 ("a_" ?,A*(B) |
19901 | 139 |
140 ("A``" ["A`"]) | |
141 ("A''" ["A'"]) | |
142 ("A^^" ["A^"]) | |
143 ("A~~" ["A~"]) | |
144 ("A\"\"" ["A\""]) | |
145 ("A//" ["A/"]) | |
146 ("a``" ["a`"]) | |
147 ("a''" ["a'"]) | |
148 ("a^^" ["a^"]) | |
149 ("a~~" ["a~"]) | |
150 ("a\"\"" ["a\""]) | |
151 ("a//" ["a/"]) | |
152 ("E``" ["E`"]) | |
153 ("E''" ["E'"]) | |
154 ("E^^" ["E^"]) | |
155 ("E\"\"" ["E\""]) | |
156 ("E//" ["E/"]) | |
157 ("e``" ["e`"]) | |
158 ("e''" ["e'"]) | |
159 ("e^^" ["e^"]) | |
160 ("e\"\"" ["e\""]) | |
161 ("e//" ["e/"]) | |
162 ("I``" ["I`"]) | |
163 ("i``" ["i`"]) | |
164 ("I''" ["I'"]) | |
165 ("i''" ["i'"]) | |
166 ("I^^" ["I^"]) | |
167 ("i^^" ["i^"]) | |
168 ("I\"\"" ["I\""]) | |
169 ("i\"\"" ["i\""]) | |
170 ("O``" ["O`"]) | |
171 ("o``" ["o`"]) | |
172 ("O''" ["O'"]) | |
173 ("o''" ["o'"]) | |
174 ("O^^" ["O^"]) | |
175 ("o^^" ["o^"]) | |
176 ("O~~" ["O~"]) | |
177 ("o~~" ["o~"]) | |
178 ("O\"\"" ["O\""]) | |
179 ("o\"\"" ["o\""]) | |
180 ("O//" ["O/"]) | |
181 ("o//" ["o/"]) | |
182 ("U``" ["U`"]) | |
183 ("u``" ["u`"]) | |
184 ("U''" ["U'"]) | |
185 ("u''" ["u'"]) | |
186 ("U^^" ["U^"]) | |
187 ("u^^" ["u^"]) | |
188 ("U\"\"" ["U\""]) | |
189 ("u\"\"" ["u\""]) | |
190 ("Y''" ["Y'"]) | |
191 ("y''" ["y'"]) | |
192 ("y\"\"" ["y\""]) | |
193 ("D//" ["D/"]) | |
194 ("d//" ["d/"]) | |
195 ("T//" ["T/"]) | |
196 ("t//" ["t/"]) | |
197 ("s//" ["s/"]) | |
198 ("C//" ["C/"]) | |
199 ("c//" ["c/"]) | |
200 ("N~~" ["N~"]) | |
201 ("n~~" ["n~"]) | |
202 ("?//" ["?/"]) | |
203 ("!//" ["!/"]) | |
204 ("<<<" ["<<"]) | |
205 (">>>" [">>"]) | |
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
206 ("o__" ["o_"]) |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
207 ("a__" ["a_"]) |
19901 | 208 ) |
209 | |
210 (quail-define-package | |
211 "latin-2-alt-postfix" "Latin-2" "2<" t | |
212 "Latin-2 character input method with postfix modifiers | |
79568 | 213 This input method differs from `latin-2-postfix' in that |
214 comma and period are not special (use ` instead). | |
19901 | 215 |
216 | postfix | examples | |
217 ------------+---------+---------- | |
218 acute | ' | a' -> ,Ba(B | |
219 ogonek | ` | a` -> ,B1(B | |
220 diaeresis | \" | a\" -> ,Bd(B | |
221 circumflex | ^ | a^ -> ,Bb(B | |
222 breve | ~ | a~ -> ,Bc(B | |
223 cedilla | ` | c` -> ,Bg(B | |
224 caron | ~ | c~ -> ,Bh(B | |
21507
8b9dd332ccf1
(latin-2-alt-postfix): Doc fix.
Andreas Schwab <schwab@suse.de>
parents:
19940
diff
changeset
|
225 dbl. acute | : | o: -> ,Bu(B |
19901 | 226 ring | ` | u` -> ,By(B |
227 dot | ` | z` -> ,B?(B | |
228 stroke | / | d/ -> ,Bp(B | |
229 others | / | s/ -> ,B_(B | |
230 | |
79568 | 231 It seems natural to use period and comma for dots/rings and |
232 cedillas/ogoneks, but that is inconvenient in practice, because | |
19901 | 233 periods and commas are needed very often after a letter. |
234 | |
235 Doubling the postfix separates the letter and postfix: e.g. a'' -> a' | |
236 " nil t nil nil nil nil nil nil nil nil t) | |
237 | |
238 (quail-define-rules | |
239 ("A'" ?,BA(B) | |
240 ("A`" ?,B!(B) | |
241 ("A\"" ?,BD(B) | |
242 ("A^" ?,BB(B) | |
243 ("A~" ?,BC(B) | |
244 ("C'" ?,BF(B) | |
245 ("C`" ?,BG(B) | |
246 ("C~" ?,BH(B) | |
247 ("D/" ?,BP(B) | |
248 ("D~" ?,BO(B) | |
249 ("E'" ?,BI(B) | |
250 ("E`" ?,BJ(B) | |
251 ("E\"" ?,BK(B) | |
252 ("E~" ?,BL(B) | |
253 ("I'" ?,BM(B) | |
254 ("I^" ?,BN(B) | |
255 ("L'" ?,BE(B) | |
256 ("L/" ?,B#(B) | |
257 ("L~" ?,B%(B) | |
258 ("N'" ?,BQ(B) | |
259 ("N~" ?,BR(B) | |
260 ("O'" ?,BS(B) | |
19940
ba2ea2a6386a
(latin-2-postfix): Use : for double-acute again.
Richard M. Stallman <rms@gnu.org>
parents:
19901
diff
changeset
|
261 ("O:" ?,BU(B) |
19901 | 262 ("O\"" ?,BV(B) |
263 ("O^" ?,BT(B) | |
264 ("R'" ?,B@(B) | |
265 ("R~" ?,BX(B) | |
266 ("S'" ?,B&(B) | |
267 ("S`" ?,B*(B) | |
268 ("S~" ?,B)(B) | |
269 ("T`" ?,B^(B) | |
270 ("T~" ?,B+(B) | |
271 ("U'" ?,BZ(B) | |
19940
ba2ea2a6386a
(latin-2-postfix): Use : for double-acute again.
Richard M. Stallman <rms@gnu.org>
parents:
19901
diff
changeset
|
272 ("U:" ?,B[(B) |
19901 | 273 ("U\"" ?,B\(B) |
274 ("U`" ?,BY(B) | |
275 ("Y'" ?,B](B) | |
276 ("Z'" ?,B,(B) | |
277 ("Z`" ?,B/(B) | |
278 ("Z~" ?,B.(B) | |
279 ("a'" ?,Ba(B) | |
280 ("a`" ?,B1(B) | |
281 ("a\"" ?,Bd(B) | |
282 ("a^" ?,Bb(B) | |
283 ("a~" ?,Bc(B) | |
284 ("c'" ?,Bf(B) | |
285 ("c`" ?,Bg(B) | |
286 ("c~" ?,Bh(B) | |
287 ("d/" ?,Bp(B) | |
288 ("d~" ?,Bo(B) | |
289 ("e'" ?,Bi(B) | |
290 ("e`" ?,Bj(B) | |
291 ("e\"" ?,Bk(B) | |
292 ("e~" ?,Bl(B) | |
293 ("i'" ?,Bm(B) | |
294 ("i^" ?,Bn(B) | |
295 ("l'" ?,Be(B) | |
296 ("l/" ?,B3(B) | |
297 ("l~" ?,B5(B) | |
298 ("n'" ?,Bq(B) | |
299 ("n~" ?,Br(B) | |
300 ("o'" ?,Bs(B) | |
19940
ba2ea2a6386a
(latin-2-postfix): Use : for double-acute again.
Richard M. Stallman <rms@gnu.org>
parents:
19901
diff
changeset
|
301 ("o:" ?,Bu(B) |
19901 | 302 ("o\"" ?,Bv(B) |
303 ("o^" ?,Bt(B) | |
304 ("r'" ?,B`(B) | |
305 ("r~" ?,Bx(B) | |
306 ("s'" ?,B6(B) | |
307 ("s`" ?,B:(B) | |
308 ("s/" ?,B_(B) | |
309 ("s~" ?,B9(B) | |
310 ("t`" ?,B~(B) | |
311 ("t~" ?,B;(B) | |
312 ("u'" ?,Bz(B) | |
19940
ba2ea2a6386a
(latin-2-postfix): Use : for double-acute again.
Richard M. Stallman <rms@gnu.org>
parents:
19901
diff
changeset
|
313 ("u:" ?,B{(B) |
19901 | 314 ("u\"" ?,B|(B) |
315 ("u`" ?,By(B) | |
316 ("y'" ?,B}(B) | |
317 ("z'" ?,B<(B) | |
318 ("z`" ?,B?(B) | |
319 ("z~" ?,B>(B) | |
320 | |
321 ("A''" ["A'"]) | |
322 ("A``" ["A`"]) | |
323 ("A\"\"" ["A\""]) | |
324 ("A^^" ["A^"]) | |
325 ("A~~" ["A~"]) | |
326 ("C''" ["C'"]) | |
327 ("C``" ["C`"]) | |
328 ("C~~" ["C~"]) | |
329 ("D//" ["D/"]) | |
330 ("D~~" ["D~"]) | |
331 ("E''" ["E'"]) | |
332 ("E``" ["E`"]) | |
333 ("E\"\"" ["E\""]) | |
334 ("E~~" ["E~"]) | |
335 ("I''" ["I'"]) | |
336 ("I^^" ["I^"]) | |
337 ("L''" ["L'"]) | |
338 ("L//" ["L/"]) | |
339 ("L~~" ["L~"]) | |
340 ("N''" ["N'"]) | |
341 ("N~~" ["N~"]) | |
342 ("O''" ["O'"]) | |
343 ("O::" ["O:"]) | |
344 ("O\"\"" ["O\""]) | |
345 ("O^^" ["O^"]) | |
346 ("R''" ["R'"]) | |
347 ("R~~" ["R~"]) | |
348 ("S''" ["S'"]) | |
349 ("S``" ["S`"]) | |
350 ("S~~" ["S~"]) | |
351 ("T``" ["T`"]) | |
352 ("T~~" ["T~"]) | |
353 ("U''" ["U'"]) | |
354 ("U::" ["U:"]) | |
355 ("U\"\"" ["U\""]) | |
356 ("U``" ["U`"]) | |
357 ("Y''" ["Y'"]) | |
358 ("Z''" ["Z'"]) | |
359 ("Z``" ["Z`"]) | |
360 ("Z~~" ["Z~"]) | |
361 ("a''" ["a'"]) | |
362 ("a``" ["a`"]) | |
363 ("a\"\"" ["a\""]) | |
364 ("a^^" ["a^"]) | |
365 ("a~~" ["a~"]) | |
366 ("c''" ["c'"]) | |
367 ("c``" ["c`"]) | |
368 ("c~~" ["c~"]) | |
369 ("d//" ["d/"]) | |
370 ("d~~" ["d~"]) | |
371 ("e''" ["e'"]) | |
372 ("e``" ["e`"]) | |
373 ("e\"\"" ["e\""]) | |
374 ("e~~" ["e~"]) | |
375 ("i''" ["i'"]) | |
376 ("i^^" ["i^"]) | |
377 ("l''" ["l'"]) | |
378 ("l//" ["l/"]) | |
379 ("l~~" ["l~"]) | |
380 ("n''" ["n'"]) | |
381 ("n~~" ["n~"]) | |
382 ("o''" ["o'"]) | |
383 ("o::" ["o:"]) | |
384 ("o\"\"" ["o\""]) | |
385 ("o^^" ["o^"]) | |
386 ("r''" ["r'"]) | |
387 ("r~~" ["r~"]) | |
388 ("s''" ["s'"]) | |
389 ("s``" ["s`"]) | |
390 ("s//" ["s/"]) | |
391 ("s~~" ["s~"]) | |
392 ("t``" ["t`"]) | |
393 ("t~~" ["t~"]) | |
394 ("u''" ["u'"]) | |
395 ("u::" ["u:"]) | |
396 ("u\"\"" ["u\""]) | |
397 ("u``" ["u`"]) | |
398 ("y''" ["y'"]) | |
399 ("z''" ["z'"]) | |
400 ("z``" ["z`"]) | |
401 ("z~~" ["z~"]) | |
402 ) | |
403 | |
404 (quail-define-package | |
405 "latin-3-alt-postfix" "Latin-3" "3<" t | |
406 "Latin-3 character input method with postfix modifiers | |
79568 | 407 This input method differs from `latin-3-postfix' in that |
408 comma is not special (use ` instead), and period is not | |
409 special (use slash instead). | |
19901 | 410 |
411 | postfix | examples | |
412 ------------+---------+---------- | |
413 acute | ' | a' -> ,Ca(B | |
414 grave | ` | a` -> ,C`(B | |
415 circumflex | ^ | a^ -> ,Cb(B | |
416 diaeresis | \" | a\" -> ,Cd(B | |
417 dot | / | c/ -> ,Ce(B i/ -> ,C9(B I/ -> ,C)(B | |
418 cedilla | ` | c` -> ,Cg(B | |
419 breve | ~ | g~ -> ,C;(B | |
420 tilde | ~ | n~ -> ,Cq(B | |
421 stroke | / | h/ -> ,C1(B | |
422 others | / | s/ -> ,C_(B | |
423 | |
424 It would be natural to use period and comma for dots and cedillas, but | |
425 that would inconvenient in practice, because periods and commas are | |
426 needed very often after a letter. | |
427 | |
428 Doubling the postfix separates the letter and postfix: e.g. a'' -> a' | |
429 " nil t nil nil nil nil nil nil nil nil t) | |
430 | |
431 (quail-define-rules | |
432 ("A`" ?,C@(B) | |
433 ("A'" ?,CA(B) | |
434 ("A^" ?,CB(B) | |
435 ("A\"" ?,CD(B) | |
436 ("C/" ?,CE(B) | |
437 ("C^" ?,CF(B) | |
438 ("C`" ?,CG(B) | |
439 ("E`" ?,CH(B) | |
440 ("E'" ?,CI(B) | |
441 ("E^" ?,CJ(B) | |
442 ("E\"" ?,CK(B) | |
443 ("G~" ?,C+(B) | |
444 ("G/" ?,CU(B) | |
445 ("G^" ?,CX(B) | |
446 ("H/" ?,C!(B) | |
447 ("H^" ?,C&(B) | |
448 ("I/" ?,C)(B) | |
449 ("I`" ?,CL(B) | |
450 ("I'" ?,CM(B) | |
451 ("I^" ?,CN(B) | |
452 ("I\"" ?,CO(B) | |
453 ("J^" ?,C,(B) | |
454 ("N~" ?,CQ(B) | |
455 ("O`" ?,CR(B) | |
456 ("O'" ?,CS(B) | |
457 ("O^" ?,CT(B) | |
458 ("O\"" ?,CV(B) | |
459 ("S`" ?,C*(B) | |
460 ("S^" ?,C^(B) | |
461 ("U`" ?,CY(B) | |
462 ("U'" ?,CZ(B) | |
463 ("U^" ?,C[(B) | |
464 ("U\"" ?,C\(B) | |
465 ("U~" ?,C](B) | |
466 ("Z/" ?,C/(B) | |
467 ("a`" ?,C`(B) | |
468 ("a'" ?,Ca(B) | |
469 ("a^" ?,Cb(B) | |
470 ("a\"" ?,Cd(B) | |
471 ("c/" ?,Ce(B) | |
472 ("c^" ?,Cf(B) | |
473 ("c`" ?,Cg(B) | |
474 ("e`" ?,Ch(B) | |
475 ("e'" ?,Ci(B) | |
476 ("e^" ?,Cj(B) | |
477 ("e\"" ?,Ck(B) | |
478 ("g~" ?,C;(B) | |
479 ("g/" ?,Cu(B) | |
480 ("g^" ?,Cx(B) | |
481 ("h/" ?,C1(B) | |
482 ("h^" ?,C6(B) | |
483 ("i/" ?,C9(B) | |
484 ("i`" ?,Cl(B) | |
485 ("i'" ?,Cm(B) | |
486 ("i^" ?,Cn(B) | |
487 ("i\"" ?,Co(B) | |
488 ("j^" ?,C<(B) | |
489 ("n~" ?,Cq(B) | |
490 ("o`" ?,Cr(B) | |
491 ("o'" ?,Cs(B) | |
492 ("o^" ?,Ct(B) | |
493 ("o\"" ?,Cv(B) | |
494 ("s`" ?,C:(B) | |
495 ("s/" ?,C_(B) | |
496 ("s^" ?,C~(B) | |
497 ("u`" ?,Cy(B) | |
498 ("u'" ?,Cz(B) | |
499 ("u^" ?,C{(B) | |
500 ("u\"" ?,C|(B) | |
501 ("u~" ?,C}(B) | |
502 ("z/" ?,C?(B) | |
503 | |
504 ("A``" ["A`"]) | |
505 ("A''" ["A'"]) | |
506 ("A^^" ["A^"]) | |
507 ("A\"\"" ["A\""]) | |
508 ("C//" ["C/"]) | |
509 ("C^^" ["C^"]) | |
510 ("C``" ["C`"]) | |
511 ("E``" ["E`"]) | |
512 ("E''" ["E'"]) | |
513 ("E^^" ["E^"]) | |
514 ("E\"\"" ["E\""]) | |
515 ("G~~" ["G~"]) | |
516 ("G//" ["G/"]) | |
517 ("G^^" ["G^"]) | |
518 ("H//" ["H/"]) | |
519 ("H^^" ["H^"]) | |
520 ("I//" ["I/"]) | |
521 ("I``" ["I`"]) | |
522 ("I''" ["I'"]) | |
523 ("I^^" ["I^"]) | |
524 ("I\"\"" ["I\""]) | |
525 ("J^^" ["J^"]) | |
526 ("N~~" ["N~"]) | |
527 ("O``" ["O`"]) | |
528 ("O''" ["O'"]) | |
529 ("O^^" ["O^"]) | |
530 ("O\"\"" ["O\""]) | |
531 ("S``" ["S`"]) | |
532 ("S^^" ["S^"]) | |
533 ("U``" ["U`"]) | |
534 ("U''" ["U'"]) | |
535 ("U^^" ["U^"]) | |
536 ("U\"\"" ["U\""]) | |
537 ("U~~" ["U~"]) | |
538 ("Z//" ["Z/"]) | |
539 ("a``" ["a`"]) | |
540 ("a''" ["a'"]) | |
541 ("a^^" ["a^"]) | |
542 ("a\"\"" ["a\""]) | |
543 ("c//" ["c/"]) | |
544 ("c^^" ["c^"]) | |
545 ("c``" ["c`"]) | |
546 ("e``" ["e`"]) | |
547 ("e''" ["e'"]) | |
548 ("e^^" ["e^"]) | |
549 ("e\"\"" ["e\""]) | |
550 ("g~~" ["g~"]) | |
551 ("g//" ["g/"]) | |
552 ("g^^" ["g^"]) | |
553 ("h//" ["h/"]) | |
554 ("h^^" ["h^"]) | |
555 ("i//" ["i/"]) | |
556 ("i``" ["i`"]) | |
557 ("i''" ["i'"]) | |
558 ("i^^" ["i^"]) | |
559 ("i\"\"" ["i\""]) | |
560 ("j^^" ["j^"]) | |
561 ("n~~" ["n~"]) | |
562 ("o``" ["o`"]) | |
563 ("o''" ["o'"]) | |
564 ("o^^" ["o^"]) | |
565 ("o\"\"" ["o\""]) | |
566 ("s``" ["s`"]) | |
567 ("s//" ["s/"]) | |
568 ("s^^" ["s^"]) | |
569 ("u``" ["u`"]) | |
570 ("u''" ["u'"]) | |
571 ("u^^" ["u^"]) | |
572 ("u\"\"" ["u\""]) | |
573 ("u~~" ["u~"]) | |
574 ("z//" ["z/"]) | |
575 ) | |
576 | |
577 (quail-define-package | |
578 "latin-4-alt-postfix" "Latin-4" "4<" t | |
579 "Latin-4 characters input method with postfix modifiers | |
79568 | 580 This input method differs from `latin-4-postfix' in that |
581 comma is not special (use ` instead), and period is not | |
582 special (use ~ instead). | |
19901 | 583 |
584 | postfix | examples | |
585 ------------+---------+---------- | |
586 acute | ' | a' -> ,Da(B | |
587 circumflex | ^ | a^ -> ,Db(B | |
588 diaeresis | \" | a\" -> ,Dd(B | |
589 ogonek | ` | a` -> ,D1(B | |
590 macron | - | a- -> ,D`(B | |
591 tilde | ~ | a~ -> ,Dc(B | |
592 caron | ~ | c~ -> ,Dh(B | |
593 dot | ~ | e~ -> ,Dl(B | |
594 cedilla | ` | k` -> ,Ds(B g` -> ,D;(B | |
595 stroke | / | d/ -> ,Dp(B | |
596 nordic | / | a/ -> ,De(B e/ -> ,Df(B o/ -> ,Dx(B | |
597 others | / | s/ -> ,D_(B n/ -> ,D?(B k/ -> ,D"(B | |
598 | |
79568 | 599 It seems natural to use period and comma for dots and |
600 cedillas/ogoneks, but that is inconvenient in practice, because | |
19901 | 601 periods and commas are needed very often after a letter. |
602 | |
603 Doubling the postfix separates the letter and postfix: e.g. a'' -> a' | |
604 " nil t nil nil nil nil nil nil nil nil t) | |
605 | |
606 (quail-define-rules | |
607 ("A`" ?,D!(B) | |
608 ("A-" ?,D@(B) | |
609 ("A'" ?,DA(B) | |
610 ("A^" ?,DB(B) | |
611 ("A~" ?,DC(B) | |
612 ("A\"" ?,DD(B) | |
613 ("A/" ?,DE(B) | |
614 ("C~" ?,DH(B) | |
615 ("D/" ?,DP(B) | |
616 ("E/" ?,DF(B) | |
617 ("E-" ?,D*(B) | |
618 ("E'" ?,DI(B) | |
619 ("E`" ?,DJ(B) | |
620 ("E\"" ?,DK(B) | |
621 ("E~" ?,DL(B) | |
622 ("G`" ?,D+(B) | |
623 ("I~" ?,D%(B) | |
624 ("I`" ?,DG(B) | |
625 ("I'" ?,DM(B) | |
626 ("I^" ?,DN(B) | |
627 ("I-" ?,DO(B) | |
628 ("K`" ?,DS(B) | |
629 ("L`" ?,D&(B) | |
630 ("N/" ?,D=(B) | |
631 ("N`" ?,DQ(B) | |
632 ("O-" ?,DR(B) | |
633 ("O^" ?,DT(B) | |
634 ("O~" ?,DU(B) | |
635 ("O\"" ?,DV(B) | |
636 ("O/" ?,DX(B) | |
637 ("R`" ?,D#(B) | |
638 ("S~" ?,D)(B) | |
639 ("T/" ?,D,(B) | |
640 ("U`" ?,DY(B) | |
641 ("U'" ?,DZ(B) | |
642 ("U^" ?,D[(B) | |
643 ("U\"" ?,D\(B) | |
644 ("U~" ?,D](B) | |
645 ("U-" ?,D^(B) | |
646 ("Z~" ?,D.(B) | |
647 ("a`" ?,D1(B) | |
648 ("a-" ?,D`(B) | |
649 ("a'" ?,Da(B) | |
650 ("a^" ?,Db(B) | |
651 ("a~" ?,Dc(B) | |
652 ("a\"" ?,Dd(B) | |
653 ("a/" ?,De(B) | |
654 ("c~" ?,Dh(B) | |
655 ("d/" ?,Dp(B) | |
656 ("e/" ?,Df(B) | |
657 ("e-" ?,D:(B) | |
658 ("e'" ?,Di(B) | |
659 ("e`" ?,Dj(B) | |
660 ("e\"" ?,Dk(B) | |
661 ("e~" ?,Dl(B) | |
662 ("g`" ?,D;(B) | |
663 ("i~" ?,D5(B) | |
664 ("i`" ?,Dg(B) | |
665 ("i'" ?,Dm(B) | |
666 ("i^" ?,Dn(B) | |
667 ("i-" ?,Do(B) | |
668 ("k/" ?,D"(B) | |
669 ("k`" ?,Ds(B) | |
670 ("l`" ?,D6(B) | |
671 ("n/" ?,D?(B) | |
672 ("n`" ?,Dq(B) | |
673 ("o-" ?,Dr(B) | |
674 ("o^" ?,Dt(B) | |
675 ("o~" ?,Du(B) | |
676 ("o\"" ?,Dv(B) | |
677 ("o/" ?,Dx(B) | |
678 ("r`" ?,D3(B) | |
679 ("s/" ?,D_(B) | |
680 ("s~" ?,D9(B) | |
681 ("t/" ?,D<(B) | |
682 ("u`" ?,Dy(B) | |
683 ("u'" ?,Dz(B) | |
684 ("u^" ?,D{(B) | |
685 ("u\"" ?,D|(B) | |
686 ("u~" ?,D}(B) | |
687 ("u-" ?,D~(B) | |
688 ("z~" ?,D>(B) | |
689 | |
690 ("A``" ["A`"]) | |
691 ("A--" ["A-"]) | |
692 ("A''" ["A'"]) | |
693 ("A^^" ["A^"]) | |
694 ("A~~" ["A~"]) | |
695 ("A\"\"" ["A\""]) | |
696 ("A//" ["A/"]) | |
697 ("C~~" ["C~"]) | |
698 ("D//" ["D/"]) | |
699 ("E//" ["E/"]) | |
700 ("E--" ["E-"]) | |
701 ("E''" ["E'"]) | |
702 ("E``" ["E`"]) | |
703 ("E\"\"" ["E\""]) | |
704 ("E~~" ["E~"]) | |
705 ("G``" ["G`"]) | |
706 ("I~~" ["I~"]) | |
707 ("I``" ["I`"]) | |
708 ("I''" ["I'"]) | |
709 ("I^^" ["I^"]) | |
710 ("I--" ["I-"]) | |
711 ("K``" ["K`"]) | |
712 ("L``" ["L`"]) | |
713 ("N//" ["N/"]) | |
714 ("N``" ["N`"]) | |
715 ("O--" ["O-"]) | |
716 ("O^^" ["O^"]) | |
717 ("O~~" ["O~"]) | |
718 ("O\"\"" ["O\""]) | |
719 ("O//" ["O/"]) | |
720 ("R``" ["R`"]) | |
721 ("S~~" ["S~"]) | |
722 ("T//" ["T/"]) | |
723 ("U``" ["U`"]) | |
724 ("U''" ["U'"]) | |
725 ("U^^" ["U^"]) | |
726 ("U\"\"" ["U\""]) | |
727 ("U~~" ["U~"]) | |
728 ("U--" ["U-"]) | |
729 ("Z~~" ["Z~"]) | |
730 ("a``" ["a`"]) | |
731 ("a--" ["a-"]) | |
732 ("a''" ["a'"]) | |
733 ("a^^" ["a^"]) | |
734 ("a~~" ["a~"]) | |
735 ("a\"\"" ["a\""]) | |
736 ("a//" ["a/"]) | |
737 ("c~~" ["c~"]) | |
738 ("d//" ["d/"]) | |
739 ("e//" ["e/"]) | |
740 ("e--" ["e-"]) | |
741 ("e''" ["e'"]) | |
742 ("e``" ["e`"]) | |
743 ("e\"\"" ["e\""]) | |
744 ("e~~" ["e~"]) | |
745 ("g``" ["g`"]) | |
746 ("i~~" ["i~"]) | |
747 ("i``" ["i`"]) | |
748 ("i''" ["i'"]) | |
749 ("i^^" ["i^"]) | |
750 ("i--" ["i-"]) | |
751 ("k//" ["k/"]) | |
752 ("k``" ["k`"]) | |
753 ("l``" ["l`"]) | |
754 ("n//" ["n/"]) | |
755 ("n``" ["n`"]) | |
756 ("o--" ["o-"]) | |
757 ("o^^" ["o^"]) | |
758 ("o~~" ["o~"]) | |
759 ("o\"\"" ["o\""]) | |
760 ("o//" ["o/"]) | |
761 ("r``" ["r`"]) | |
762 ("s//" ["s/"]) | |
763 ("s~~" ["s~"]) | |
764 ("t//" ["t/"]) | |
765 ("u``" ["u`"]) | |
766 ("u''" ["u'"]) | |
767 ("u^^" ["u^"]) | |
768 ("u\"\"" ["u\""]) | |
769 ("u~~" ["u~"]) | |
770 ("u--" ["u-"]) | |
771 ("z~~" ["z~"]) | |
772 ) | |
773 | |
774 (quail-define-package | |
775 "latin-5-alt-postfix" "Latin-5" "5<" t | |
776 "Latin-5 characters input method with postfix modifiers | |
79568 | 777 This input method differs from `latin-5-postfix' in that |
778 comma is not special (use ` instead), and period is not | |
779 special (use / instead). | |
19901 | 780 |
781 | postfix | examples | |
782 ------------+---------+---------- | |
783 acute | ' | a' -> ,Ma(B | |
784 grave | ` | a` -> ,M`(B | |
785 circumflex | ^ | a^ -> ,Mb(B | |
786 diaeresis | \" | a\" -> ,Md(B | |
787 tilde | ~ | a~ -> ,Mc(B | |
788 breve | ~ | g~ -> ,Mp(B | |
789 cedilla | ` | c` -> ,Mg(B | |
790 dot | / | i/ -> ,M}(B I/ -> ,M](B | |
791 nordic | / | a/ -> ,Me(B e/ -> ,Mf(B o/ -> ,Mx(B | |
792 others | / | s/ -> ,M_(B | |
793 | |
79568 | 794 It seems natural to use period and comma for dots and cedillas, but |
795 that is inconvenient in practice, because periods and commas are | |
19901 | 796 needed very often after a letter. |
797 | |
798 Doubling the postfix separates the letter and postfix: e.g. a'' -> a' | |
799 " nil t nil nil nil nil nil nil nil nil t) | |
800 | |
801 (quail-define-rules | |
802 ("A'" ?,MA(B) | |
803 ("A/" ?,ME(B) | |
804 ("A\"" ?,MD(B) | |
805 ("A^" ?,MB(B) | |
806 ("A`" ?,M@(B) | |
807 ("A~" ?,MC(B) | |
808 ("C`" ?,MG(B) | |
809 ("E'" ?,MI(B) | |
810 ("E/" ?,MF(B) | |
811 ("E\"" ?,MK(B) | |
812 ("E^" ?,MJ(B) | |
813 ("E`" ?,MH(B) | |
814 ("G~" ?,MP(B) | |
815 ("I'" ?,MM(B) | |
816 ("I/" ?,M](B) | |
817 ("I\"" ?,MO(B) | |
818 ("I^" ?,MN(B) | |
819 ("I`" ?,ML(B) | |
820 ("N~" ?,MQ(B) | |
821 ("O'" ?,MS(B) | |
822 ("O/" ?,MX(B) | |
823 ("O\"" ?,MV(B) | |
824 ("O^" ?,MT(B) | |
825 ("O`" ?,MR(B) | |
826 ("O~" ?,MU(B) | |
827 ("S`" ?,M^(B) | |
828 ("U'" ?,MZ(B) | |
829 ("U\"" ?,M\(B) | |
830 ("U^" ?,M[(B) | |
831 ("U`" ?,MY(B) | |
832 ("a'" ?,Ma(B) | |
833 ("a/" ?,Me(B) | |
834 ("a\"" ?,Md(B) | |
835 ("a^" ?,Mb(B) | |
836 ("a`" ?,M`(B) | |
837 ("a~" ?,Mc(B) | |
838 ("c`" ?,Mg(B) | |
839 ("e'" ?,Mi(B) | |
840 ("e/" ?,Mf(B) | |
841 ("e\"" ?,Mk(B) | |
842 ("e^" ?,Mj(B) | |
843 ("e`" ?,Mh(B) | |
844 ("g~" ?,Mp(B) | |
845 ("i'" ?,Mm(B) | |
846 ("i/" ?,M}(B) | |
847 ("i\"" ?,Mo(B) | |
848 ("i^" ?,Mn(B) | |
849 ("i`" ?,Ml(B) | |
850 ("n~" ?,Mq(B) | |
851 ("o'" ?,Ms(B) | |
852 ("o/" ?,Mx(B) | |
853 ("o\"" ?,Mv(B) | |
854 ("o^" ?,Mt(B) | |
855 ("o`" ?,Mr(B) | |
856 ("o~" ?,Mu(B) | |
857 ("s`" ?,M~(B) | |
858 ("s/" ?,M_(B) | |
859 ("u'" ?,Mz(B) | |
860 ("u\"" ?,M|(B) | |
861 ("u^" ?,M{(B) | |
862 ("u`" ?,My(B) | |
863 ("y\"" ?,M(B) | |
864 | |
865 ("A''" ["A'"]) | |
866 ("A//" ["A/"]) | |
867 ("A\"\"" ["A\""]) | |
868 ("A^^" ["A^"]) | |
869 ("A``" ["A`"]) | |
870 ("A~~" ["A~"]) | |
871 ("C``" ["C`"]) | |
872 ("E''" ["E'"]) | |
873 ("E//" ["E/"]) | |
874 ("E\"\"" ["E\""]) | |
875 ("E^^" ["E^"]) | |
876 ("E``" ["E`"]) | |
877 ("G~~" ["G~"]) | |
878 ("I''" ["I'"]) | |
879 ("I//" ["I/"]) | |
880 ("I\"\"" ["I\""]) | |
881 ("I^^" ["I^"]) | |
882 ("I``" ["I`"]) | |
883 ("N~~" ["N~"]) | |
884 ("O''" ["O'"]) | |
885 ("O//" ["O/"]) | |
886 ("O\"\"" ["O\""]) | |
887 ("O^^" ["O^"]) | |
888 ("O``" ["O`"]) | |
889 ("O~~" ["O~"]) | |
890 ("S``" ["S`"]) | |
891 ("U''" ["U'"]) | |
892 ("U\"\"" ["U\""]) | |
893 ("U^^" ["U^"]) | |
894 ("U``" ["U`"]) | |
895 ("a''" ["a'"]) | |
896 ("a//" ["a/"]) | |
897 ("a\"\"" ["a\""]) | |
898 ("a^^" ["a^"]) | |
899 ("a``" ["a`"]) | |
900 ("a~~" ["a~"]) | |
901 ("c``" ["c`"]) | |
902 ("e''" ["e'"]) | |
903 ("e//" ["e/"]) | |
904 ("e\"\"" ["e\""]) | |
905 ("e^^" ["e^"]) | |
906 ("e``" ["e`"]) | |
907 ("g~~" ["g~"]) | |
908 ("i''" ["i'"]) | |
909 ("i//" ["i/"]) | |
910 ("i\"\"" ["i\""]) | |
911 ("i^^" ["i^"]) | |
912 ("i``" ["i`"]) | |
913 ("n~~" ["n~"]) | |
914 ("o''" ["o'"]) | |
915 ("o//" ["o/"]) | |
916 ("o\"\"" ["o\""]) | |
917 ("o^^" ["o^"]) | |
918 ("o``" ["o`"]) | |
919 ("o~~" ["o~"]) | |
920 ("s``" ["s`"]) | |
921 ("s//" ["s/"]) | |
922 ("u''" ["u'"]) | |
923 ("u\"\"" ["u\""]) | |
924 ("u^^" ["u^"]) | |
925 ("u``" ["u`"]) | |
926 ("y\"\"" ["y\""]) | |
927 ) | |
928 | |
929 | |
930 | |
931 (quail-define-package | |
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
932 "french-alt-postfix" "French" "FR<" t |
19901 | 933 "French (Fran,Ag(Bais) input method with postfix modifiers |
934 | |
935 ` pour grave, ' pour aigu, ^ pour circonflexe, et \" pour tr,Ai(Bma. | |
34937 | 936 Par exemple: a` -> ,A`(B e' -> ,Ai(B. |
19901 | 937 |
938 ,AG(B, ,A+(B, et ,A;(B sont produits par C/, <<, et >>. | |
939 | |
940 En doublant la frappe des diacritiques, ils s'isoleront de la lettre. | |
941 Par exemple: e'' -> e' | |
942 | |
943 <e dans l'o> n'est pas disponible." | |
944 nil t nil nil nil nil nil nil nil nil t) | |
945 | |
946 (quail-define-rules | |
947 ("A`" ?,A@(B) | |
948 ("A^" ?,AB(B) | |
949 ("a`" ?,A`(B) | |
950 ("a^" ?,Ab(B) | |
951 ("E`" ?,AH(B) | |
952 ("E'" ?,AI(B) | |
953 ("E^" ?,AJ(B) | |
954 ("E\"" ?,AK(B) | |
955 ("e`" ?,Ah(B) | |
956 ("e'" ?,Ai(B) | |
957 ("e^" ?,Aj(B) | |
958 ("e\"" ?,Ak(B) | |
959 ("I^" ?,AN(B) | |
960 ("I\"" ?,AO(B) | |
961 ("i^" ?,An(B) | |
962 ("i\"" ?,Ao(B) | |
963 ("O^" ?,AT(B) | |
964 ("o^" ?,At(B) | |
965 ("U`" ?,AY(B) | |
966 ("U^" ?,A[(B) | |
967 ("U\"" ?,A\(B) | |
968 ("u`" ?,Ay(B) | |
969 ("u^" ?,A{(B) | |
970 ("u\"" ?,A|(B) | |
971 ("C/" ?,AG(B) | |
972 ("c/" ?,Ag(B) | |
973 ("<<" ?,A+(B) | |
974 (">>" ?,A;(B) | |
975 | |
976 ("A``" ["A`"]) | |
977 ("A^^" ["A^"]) | |
978 ("a``" ["a`"]) | |
979 ("a^^" ["a^"]) | |
980 ("E``" ["E`"]) | |
981 ("E''" ["E'"]) | |
982 ("E^^" ["E^"]) | |
983 ("E\"\"" ["E\""]) | |
984 ("e``" ["e`"]) | |
985 ("e''" ["e'"]) | |
986 ("e^^" ["e^"]) | |
987 ("e\"\"" ["e\""]) | |
988 ("I^^" ["I^"]) | |
989 ("I\"\"" ["I\""]) | |
990 ("i^^" ["i^"]) | |
991 ("i\"\"" ["i\""]) | |
992 ("O^^" ["O^"]) | |
993 ("o^^" ["o^"]) | |
994 ("U``" ["U`"]) | |
995 ("U^^" ["U^"]) | |
996 ("U\"\"" ["U\""]) | |
997 ("u``" ["u`"]) | |
998 ("u^^" ["u^"]) | |
999 ("u\"\"" ["u\""]) | |
1000 ("C//" ["C/"]) | |
1001 ("c//" ["c/"]) | |
1002 ("<<<" ["<<"]) | |
1003 (">>>" [">>"]) | |
1004 ) | |
1005 | |
1006 | |
1007 | |
1008 (quail-define-package | |
1009 "italian-alt-postfix" "Latin-1" "IT<" t | |
1010 "Italian (Italiano) input method with postfix modifiers | |
1011 | |
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1012 a' -> ,Aa(B A' -> ,AA(B a` -> ,A`(B A` -> ,A@(B i^ -> ,An(B << -> ,A+(B |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1013 e' -> ,Ai(B E' -> ,AI(B e` -> ,Ah(B E` -> ,AH(B I^ -> ,AN(B >> -> ,A;(B |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1014 i' -> ,Am(B I' -> ,AM(B i` -> ,Al(B I` -> ,AL(B o_ -> ,A:(B |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1015 o' -> ,As(B O' -> ,AS(B o` -> ,Ar(B O` -> ,AR(B a_ -> ,A*(B |
40357
6f61c4e09b89
("italian-alt-postfix"): Undo previous change.
Francesco Potortì <pot@gnu.org>
parents:
40300
diff
changeset
|
1016 u' -> ,Az(B U' -> ,AZ(B u` -> ,Ay(B U` -> ,AY(B |
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1017 |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1018 This method is for purists who like accents the old way. |
19901 | 1019 |
1020 Doubling the postfix separates the letter and postfix: e.g. a`` -> a` | |
1021 " nil t nil nil nil nil nil nil nil nil t) | |
1022 | |
1023 (quail-define-rules | |
1024 ("A`" ?,A@(B) | |
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1025 ("A'" ?,AA(B) |
19901 | 1026 ("a`" ?,A`(B) |
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1027 ("a'" ?,Aa(B) |
19901 | 1028 ("E`" ?,AH(B) |
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1029 ("E'" ?,AI(B) |
19901 | 1030 ("e`" ?,Ah(B) |
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1031 ("e'" ?,Ai(B) |
19901 | 1032 ("I`" ?,AL(B) |
1033 ("i`" ?,Al(B) | |
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1034 ("I'" ?,AM(B) |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1035 ("i'" ?,Am(B) |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1036 ("I^" ?,AN(B) |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1037 ("i^" ?,An(B) |
19901 | 1038 ("O`" ?,AR(B) |
1039 ("o`" ?,Ar(B) | |
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1040 ("O'" ?,AS(B) |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1041 ("o'" ?,As(B) |
19901 | 1042 ("U`" ?,AY(B) |
1043 ("u`" ?,Ay(B) | |
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1044 ("U'" ?,AZ(B) |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1045 ("u'" ?,Az(B) |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1046 ("<<" ?,A+(B) |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1047 (">>" ?,A;(B) |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1048 ("o_" ?,A:(B) |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1049 ("a_" ?,A*(B) |
19901 | 1050 |
1051 ("A``" ["A`"]) | |
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1052 ("A''" ["A'"]) |
19901 | 1053 ("a``" ["a`"]) |
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1054 ("a''" ["a'"]) |
19901 | 1055 ("E``" ["E`"]) |
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1056 ("E''" ["E'"]) |
19901 | 1057 ("e``" ["e`"]) |
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1058 ("e''" ["e'"]) |
19901 | 1059 ("I``" ["I`"]) |
1060 ("i``" ["i`"]) | |
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1061 ("I''" ["I'"]) |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1062 ("i''" ["i'"]) |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1063 ("I^^" ["I^"]) |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1064 ("i^^" ["i^"]) |
19901 | 1065 ("O``" ["O`"]) |
1066 ("o``" ["o`"]) | |
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1067 ("O''" ["O'"]) |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1068 ("o''" ["o'"]) |
19901 | 1069 ("U``" ["U`"]) |
1070 ("u``" ["u`"]) | |
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1071 ("U''" ["U'"]) |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1072 ("u''" ["u'"]) |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1073 ("<<<" ["<<"]) |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1074 (">>>" [">>"]) |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1075 ("o__" ["o_"]) |
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1076 ("a__" ["a_"]) |
19901 | 1077 ) |
1078 | |
1079 | |
1080 (quail-define-package | |
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1081 "turkish-latin-3-alt-postfix" "Turkish" "TR3<<" t |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1082 "Turkish (T,A|(Brk,Ag(Be) input method with postfix modifiers. |
79568 | 1083 This input method differs from `turkish-latin-3-postfix' in that |
1084 comma is not special (use ` instead). | |
19901 | 1085 |
25774
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1086 This is for those who use Latin-3 (ISO-8859-3) for Turkish. If you |
34937 | 1087 use Latin-5 (ISO-8859-9), you should use \"turkish-alt-postfix\" instead. |
25774
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1088 |
19901 | 1089 Note for I, ,C9(B, ,C)(B, i. |
1090 | |
1091 A^ -> ,CB(B | |
1092 C` -> ,CG(B | |
1093 G^ -> ,C+(B | |
1094 I -> I | |
1095 i -> ,C9(B | |
1096 I/ -> ,C)(B | |
1097 i/ -> i | |
1098 O\" -> ,CV(B | |
1099 S` -> ,C*(B | |
1100 U\" -> ,C\(B | |
1101 U^ -> ,C[(B | |
1102 | |
1103 Doubling the postfix separates the letter and postfix: e.g. a^^ -> a^ | |
1104 " nil t nil nil nil nil nil nil nil nil t) | |
1105 | |
1106 (quail-define-rules | |
1107 ("A^" ?,CB(B) | |
1108 ("a^" ?,Cb(B) | |
1109 ("C`" ?,CG(B) | |
1110 ("c`" ?,Cg(B) | |
1111 ("G^" ?,C+(B) | |
1112 ("g^" ?,C;(B) | |
1113 ("I/" ?,C)(B) | |
1114 ("i" ?,C9(B) | |
1115 ("i/" ?i) | |
1116 ("O\"" ?,CV(B) | |
1117 ("o\"" ?,Cv(B) | |
1118 ("S`" ?,C*(B) | |
1119 ("s`" ?,C:(B) | |
1120 ("U\"" ?,C\(B) | |
1121 ("u\"" ?,C|(B) | |
1122 ("U^" ?,C[(B) | |
1123 ("u^" ?,C{(B) | |
1124 | |
1125 ("A^^" ["A^"]) | |
1126 ("a^^" ["a^"]) | |
1127 ("C``" ["C`"]) | |
1128 ("c``" ["c`"]) | |
1129 ("G^^" ["G^"]) | |
1130 ("g^^" ["g^"]) | |
1131 ("I//" ["I/"]) | |
1132 ("i" ["i"]) | |
1133 ("i//" ["i/"]) | |
1134 ("O\"\"" ["O\""]) | |
1135 ("o\"\"" ["o\""]) | |
1136 ("S``" ["S`"]) | |
1137 ("s``" ["s`"]) | |
1138 ("U\"\"" ["U\""]) | |
1139 ("u\"\"" ["u\""]) | |
1140 ("U^^" ["U^"]) | |
1141 ("u^^" ["u^"]) | |
1142 ) | |
25774
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1143 |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1144 (quail-define-package |
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1145 "turkish-alt-postfix" "Turkish" "TR,A+(B" t |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1146 "Turkish (T,A|(Brk,Ag(Be) input method with postfix modifiers. |
79568 | 1147 This input method differs from `turkish-postfix' in that |
1148 comma is not special (use ` instead). | |
25774
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1149 |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1150 This is for those who use Latin-5 (ISO-8859-9) for Turkish. If you |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1151 use Latin-3 (ISO-8859-3), you should use |
34937 | 1152 \"turkish-latin-3-alt-postfix\" instead. |
25774
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1153 |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1154 Note for I, ,M}(B, ,M](B, i. |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1155 |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1156 A^ -> ,MB(B |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1157 C` -> ,MG(B |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1158 G^ -> ,MP(B |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1159 I -> I |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1160 i -> ,M}(B |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1161 I/ -> ,M](B |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1162 i/ -> i |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1163 O\" -> ,MV(B |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1164 S` -> ,M^(B |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1165 U\" -> ,M\(B |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1166 U^ -> ,M[(B |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1167 |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1168 Doubling the postfix separates the letter and postfix: e.g. a^^ -> a^ |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1169 " nil t nil nil nil nil nil nil nil nil t) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1170 |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1171 (quail-define-rules |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1172 ("A^" ?,MB(B) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1173 ("a^" ?,Mb(B) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1174 ("C`" ?,MG(B) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1175 ("c`" ?,Mg(B) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1176 ("G^" ?,MP(B) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1177 ("g^" ?,Mp(B) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1178 ("I/" ?,M](B) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1179 ("i" ?,M}(B) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1180 ("i/" ?i) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1181 ("O\"" ?,MV(B) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1182 ("o\"" ?,Cv(B) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1183 ("S`" ?,M^(B) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1184 ("s`" ?,M~(B) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1185 ("U\"" ?,M\(B) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1186 ("u\"" ?,M|(B) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1187 ("U^" ?,M[(B) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1188 ("u^" ?,M{(B) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1189 |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1190 ("A^^" ["A^"]) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1191 ("a^^" ["a^"]) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1192 ("C``" ["C`"]) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1193 ("c``" ["c`"]) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1194 ("G^^" ["G^"]) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1195 ("g^^" ["g^"]) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1196 ("I//" ["I/"]) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1197 ("i" ["i"]) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1198 ("i//" ["i/"]) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1199 ("O\"\"" ["O\""]) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1200 ("o\"\"" ["o\""]) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1201 ("S``" ["S`"]) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1202 ("s``" ["s`"]) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1203 ("U\"\"" ["U\""]) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1204 ("u\"\"" ["u\""]) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1205 ("U^^" ["U^"]) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1206 ("u^^" ["u^"]) |
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1207 ) |
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
34937
diff
changeset
|
1208 |
40707 | 1209 ;; Dutch Quail input method derived from the one in Yudit by Roman |
1210 ;; Czyborra. | |
1211 (quail-define-package | |
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1212 "dutch" "Dutch" "NL" t |
40707 | 1213 "Dutch character mixfix input method. |
1214 Uses the `mule-unicode-0100-24ff' charset to supplement Latin-1. | |
1215 | |
1216 | | examples | |
1217 ------------+---------+---------- | |
1218 others | | fl. -> $,1!R(B eur. -> $,1tL(B ij -> $,1 S(B IJ -> $,1 R(B | |
1219 ------------+---------+---------- | |
1220 | postfix | | |
1221 ------------+---------+---------- | |
1222 acute | ' | a' -> ,Aa(B | |
1223 grave | ` | a` -> ,A`(B | |
1224 circumflex | ^ | a^ -> ,Ab(B | |
1225 Turkish | various | i/ -> $,1 Q(B s, -> $,1 (B g^ -> $,1 ?(B I/ -> $,1 P(B | |
1226 | | S, -> $,1 ~(B G^ -> $,1 >(B | |
1227 ------------+---------+---------- | |
1228 | prefix | | |
1229 ------------+---------+---------- | |
1230 diaeresis | \" | \"a -> ,Ad(B | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1231 |
40707 | 1232 Doubling the postfix separates the letter and postfix: e.g. a'' -> a' |
1233 " nil t nil nil nil nil nil nil nil nil t) | |
1234 | |
1235 (quail-define-rules | |
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1236 ("fl." ?$,1!R(B) ;; LATIN SMALL LETTER F WITH HOOK (florin currency symbol) |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1237 ("eur." ?$,1tL(B) ;; EURO SIGN |
40707 | 1238 ;; $,1r|(BThe 25th letter of the Dutch alphabet.$,1r}(B |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1239 ("ij" ?$,1 S(B) ;; LATIN SMALL LIGATURE IJ |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1240 ("IJ" ?$,1 R(B) ;; LATIN CAPITAL LIGATURE IJ |
40707 | 1241 ;; $,1r|(BTrema on the second letter of vowel pair.$,1r}(B Yudit uses `:', not `"'. |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1242 ("\"a" ?,Ad(B) ;; LATIN SMALL LETTER A WITH DIAERESIS |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1243 ("\"e" ?,Ak(B) ;; LATIN SMALL LETTER E WITH DIAERESIS |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1244 ("\"i" ?,Ao(B) ;; LATIN SMALL LETTER I WITH DIAERESIS |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1245 ("\"o" ?,Av(B) ;; LATIN SMALL LETTER O WITH DIAERESIS |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1246 ("\"u" ?,A|(B) ;; LATIN SMALL LETTER U WITH DIAERESIS |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1247 ("\"A" ?,AD(B) ;; LATIN CAPITAL LETTER A WITH DIAERESIS |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1248 ("\"E" ?,AK(B) ;; LATIN CAPITAL LETTER E WITH DIAERESIS |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1249 ("\"I" ?,AO(B) ;; LATIN CAPITAL LETTER I WITH DIAERESIS |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1250 ("\"O" ?,AV(B) ;; LATIN CAPITAL LETTER O WITH DIAERESIS |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1251 ("\"U" ?,A\(B) ;; LATIN CAPITAL LETTER U WITH DIAERESIS |
40707 | 1252 ;; $,1r|(BAcute, marking emphasis on long vowels$,1r}(B: |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1253 ("a'" ?,Aa(B) ;; LATIN SMALL LETTER A WITH ACUTE |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1254 ("e'" ?,Ai(B) ;; LATIN SMALL LETTER E WITH ACUTE |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1255 ("i'" ?,Am(B) ;; LATIN SMALL LETTER I WITH ACUTE |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1256 ("o'" ?,As(B) ;; LATIN SMALL LETTER O WITH ACUTE |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1257 ("u'" ?,Az(B) ;; LATIN SMALL LETTER U WITH ACUTE |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1258 ("A'" ?,AA(B) ;; LATIN CAPITAL LETTER A WITH ACUTE |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1259 ("E'" ?,AI(B) ;; LATIN CAPITAL LETTER E WITH ACUTE |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1260 ("I'" ?,AM(B) ;; LATIN CAPITAL LETTER I WITH ACUTE |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1261 ("O'" ?,AS(B) ;; LATIN CAPITAL LETTER O WITH ACUTE |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1262 ("U'" ?,AZ(B) ;; LATIN CAPITAL LETTER U WITH ACUTE |
40707 | 1263 ;; $,1r|(BGrave, marking emphasis on short vowels$,1r}(B: |
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1264 ("a`" ?,A`(B) ;; LATIN SMALL LETTER A WITH GRAVE |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1265 ("e`" ?,Ah(B) ;; LATIN SMALL LETTER E WITH GRAVE |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1266 ("i`" ?,Al(B) ;; LATIN SMALL LETTER I WITH GRAVE |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1267 ("o`" ?,Ar(B) ;; LATIN SMALL LETTER O WITH GRAVE |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1268 ("u`" ?,Ay(B) ;; LATIN SMALL LETTER U WITH GRAVE |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1269 ("A`" ?,A@(B) ;; LATIN CAPITAL LETTER A WITH GRAVE |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1270 ("E`" ?,AH(B) ;; LATIN CAPITAL LETTER E WITH GRAVE |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1271 ("I`" ?,AL(B) ;; LATIN CAPITAL LETTER I WITH GRAVE |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1272 ("O`" ?,AR(B) ;; LATIN CAPITAL LETTER O WITH GRAVE |
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1273 ("U`" ?,AY(B) ;; LATIN CAPITAL LETTER U WITH GRAVE |
40707 | 1274 ;; $,1r|(BCater for the use of many French words and use of the circumflex |
1275 ;; in Frisian.$,1r}(B Yudit used `;' for cedilla. | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1276 ("c," ?,Ag(B) ;; LATIN SMALL LETTER C WITH CEDILLA |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1277 ("C," ?,AG(B) ;; LATIN CAPITAL LETTER C WITH CEDILLA |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1278 ("a^" ?,Ab(B) ;; LATIN SMALL LETTER A WITH CIRCUMFLEX |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1279 ("e^" ?,Aj(B) ;; LATIN SMALL LETTER E WITH CIRCUMFLEX |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1280 ("i^" ?,An(B) ;; LATIN SMALL LETTER I WITH CIRCUMFLEX |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1281 ("o^" ?,At(B) ;; LATIN SMALL LETTER O WITH CIRCUMFLEX |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1282 ("u^" ?,A{(B) ;; LATIN SMALL LETTER U WITH CIRCUMFLEX |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1283 ("A^" ?,AB(B) ;; LATIN CAPITAL LETTER A WITH CIRCUMFLEX |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1284 ("E^" ?,AJ(B) ;; LATIN CAPITAL LETTER E WITH CIRCUMFLEX |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1285 ("I^" ?,AN(B) ;; LATIN CAPITAL LETTER I WITH CIRCUMFLEX |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1286 ("O^" ?,AT(B) ;; LATIN CAPITAL LETTER O WITH CIRCUMFLEX |
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1287 ("U^" ?,A[(B) ;; LATIN CAPITAL LETTER U WITH CIRCUMFLEX |
40707 | 1288 ;; $,1r|(BFollow the example of the Dutch POSIX locale, using ISO-8859-9 to |
1289 ;; cater to the many Turks in Dutch society.$,1r}(B Perhaps German methods | |
1290 ;; should do so too. Follow turkish-alt-postfix here. | |
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1291 ("i/" ?$,1 Q(B) ;; LATIN SMALL LETTER I WITH NO DOT |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1292 ("s," ?$,1 (B) ;; LATIN SMALL LETTER S WITH CEDILLA |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1293 ("g^" ?$,1 ?(B) ;; LATIN SMALL LETTER G WITH BREVE |
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1294 ("I/" ?$,1 P(B) ;; LATIN CAPITAL LETTER I WITH DOT ABOVE |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1295 ("S," ?$,1 ~(B) ;; LATIN CAPITAL LETTER S WITH CEDILLA |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1296 ("G^" ?$,1 >(B) ;; LATIN CAPITAL LETTER G WITH BREVE |
40707 | 1297 ) |
1298 | |
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1299 ;; Originally from Yudit, discussed with Albertas Agejevas |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1300 ;; <alga@uosis.mif.vu.lt> |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1301 (quail-define-package |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1302 "lithuanian-numeric" "Lithuanian" "LtN" t |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1303 "Lithuanian numeric input method. |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1304 " nil t t t t nil nil nil nil nil t) |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1305 |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1306 (quail-define-rules |
42059 | 1307 ("1" ?$,1 %(B) |
1308 ("2" ?$,1 -(B) | |
1309 ("3" ?$,1 9(B) | |
1310 ("4" ?$,1 7(B) | |
1311 ("5" ?$,1 O(B) | |
1312 ("6" ?$,1!!(B) | |
1313 ("7" ?$,1!3(B) | |
1314 ("8" ?$,1!+(B) | |
1315 ("9" ?$,1r~(B) | |
1316 ("0" ?$,1r|(B) | |
1317 ("=" ?$,1!>(B) | |
1318 ("!" ?$,1 $(B) | |
1319 ("@" ?$,1 ,(B) | |
1320 ("#" ?$,1 8(B) | |
1321 ("$" ?$,1 6(B) | |
1322 ("%" ?$,1 N(B) | |
1323 ("^" ?$,1! (B) | |
1324 ("&" ?$,1!2(B) | |
1325 ("*" ?$,1!*(B) | |
1326 ("+" ?$,1!=(B)) | |
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1327 |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1328 ;; From XFree 4.1 /usr/X11R6/lib/X11/xkb/symbols/lt, suggested by |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1329 ;; Albertas Agejevas <alga@uosis.mif.vu.lt> |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1330 (quail-define-package |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1331 "lithuanian-keyboard" "Lithuanian" "Lt" t |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1332 "Lithuanian standard keyboard input method. |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1333 " nil t t t t nil nil nil nil nil t) |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1334 |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1335 (quail-define-rules |
42059 | 1336 ("1" ?$,1 %(B) |
1337 ("!" ?$,1 $(B) | |
1338 ("2" ?$,1 -(B) | |
1339 ("@" ?$,1 ,(B) | |
1340 ("#" ?$,1 8(B) | |
1341 ("4" ?$,1 7(B) | |
1342 ("$" ?$,1 6(B) | |
1343 ("5" ?$,1 O(B) | |
1344 ("%" ?$,1 N(B) | |
1345 ("6" ?$,1!!(B) | |
1346 ("^" ?$,1! (B) | |
1347 ("7" ?$,1!3(B) | |
1348 ("&" ?$,1!2(B) | |
1349 ("9" ?$,1r~(B) | |
1350 ("0" ?$,1r|(B) | |
1351 ("=" ?$,1!>(B) | |
1352 ("+" ?$,1!=(B)) | |
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1353 |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1354 ;; From XFree 4.1 /usr/X11R6/lib/X11/xkb/symbols/lv |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1355 (quail-define-package |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1356 "latvian-keyboard" "Latvian" "Lv" t |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1357 "Latvian standard keyboard input method. |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1358 " nil t t t t nil nil nil nil nil t) |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1359 |
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1360 (quail-define-rules |
42059 | 1361 ("4" ?$,1tL(B) |
1362 ("$" ?,A"(B) | |
1363 ("e" ?$,1 3(B) | |
1364 ("E" ?$,1 2(B) | |
1365 ("r" ?$,1 w(B) | |
1366 ("R" ?$,1 v(B) | |
1367 ("u" ?$,1!+(B) | |
1368 ("U" ?$,1!*(B) | |
1369 ("i" ?$,1 K(B) | |
1370 ("I" ?$,1 J(B) | |
1371 ("o" ?$,1 m(B) | |
1372 ("O" ?$,1 l(B) | |
1373 ("a" ?$,1 !(B) | |
1374 ("A" ?$,1 (B) | |
1375 ("s" ?$,1!!(B) | |
1376 ("S" ?$,1! (B) | |
1377 ("g" ?$,1 C(B) | |
1378 ("G" ?$,1 B(B) | |
1379 ("k" ?$,1 W(B) | |
1380 ("K" ?$,1 V(B) | |
1381 ("l" ?$,1 \(B) | |
1382 ("L" ?$,1 [(B) | |
1383 ("\'" ?$,1r|(B) | |
1384 ("\"" ?$,1r~(B) | |
1385 ("z" ?$,1!>(B) | |
1386 ("Z" ?$,1!=(B) | |
1387 ("c" ?$,1 -(B) | |
1388 ("C" ?$,1 ,(B) | |
1389 ("n" ?$,1 f(B) | |
1390 ("N" ?$,1 e(B)) | |
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1391 |
46666 | 1392 (quail-define-package |
1393 "latin-alt-postfix" "Latin" "L<" t | |
1394 "Latin character input method with postfix modifiers. | |
1395 This is the union of various input methods originally made for input | |
1396 of characters from a single Latin-N charset. | |
1397 | |
1398 | postfix | examples | |
1399 ------------+---------+---------- | |
1400 acute | ' | a' -> ,Aa(B | |
1401 grave | ` | a` -> ,A`(B | |
1402 circumflex | ^ | a^ -> ,Ab(B | |
1403 diaeresis | \" | a\" -> ,Ad(B | |
1404 tilde | ~ | a~ -> ,Ac(B | |
1405 cedilla | /` | c/ -> ,Ag(B c` -> ,Ag(B | |
1406 ogonek | ` | a` -> $,1 %(B | |
1407 breve | ~ | a~ -> $,1 #(B | |
1408 caron | ~ | c~ -> $,1 -(B | |
1409 dbl. acute | : | o: -> $,1 q(B | |
1410 ring | ` | u` -> $,1!/(B | |
1411 dot | ` | z` -> $,1!<(B | |
1412 stroke | / | d/ -> $,1 1(B | |
1413 nordic | / | d/ -> ,Ap(B t/ -> ,A~(B a/ -> ,Ae(B e/ -> ,Af(B o/ -> ,Ax(B | |
1414 others | /<> | s/ -> ,A_(B ?/ -> ,A?(B !/ -> ,A!(B | |
1415 | various | << -> ,A+(B >> -> ,A;(B o_ -> ,A:(B a_ -> ,A*(B | |
1416 | |
1417 It would be natural to use comma for cedillas, but that would be | |
1418 inconvenient in practice because commas are needed very often after a | |
1419 letter. | |
1420 | |
1421 Doubling the postfix separates the letter and postfix: e.g. a'' -> a' | |
1422 " nil t nil nil nil nil nil nil nil nil t) | |
1423 | |
1424 ;; Fixme: ,A&(B ,A'(B ,A((B ,A)(B ,A,(B ,A-(B ,A.(B ,A/(B ,A0(B ,A1(B ,A2(B ,A3(B ,A4(B ,A5(B ,A6(B ,A7(B ,A8(B ,A9(B ,A<(B ,A=(B ,A>(B ,AW(B ,Aw(B | |
1425 (quail-define-rules | |
1426 (" _" ?,A (B) | |
1427 ("!/" ?,A!(B) | |
1428 ("//" ?,A0(B) | |
1429 ("<<" ?,A+(B) | |
1430 (">>" ?,A;(B) | |
1431 ("?/" ?,A?(B) | |
1432 ("$/" ?,A#(B) | |
1433 ("$/" ?,A$(B) | |
1434 ("A'" ?,AA(B) | |
1435 ("A-" ?$,1 (B) | |
1436 ("A/" ?,AE(B) | |
1437 ("A\"" ?,AD(B) | |
1438 ("A^" ?,AB(B) | |
1439 ("A`" ?,A@(B) | |
1440 ("A`" ?$,1 $(B) | |
1441 ("A~" ?,AC(B) | |
1442 ("A~" ?$,1 "(B) | |
1443 ("C'" ?$,1 &(B) | |
1444 ("C/" ?,AG(B) | |
1445 ("C/" ?$,1 *(B) | |
1446 ("C^" ?$,1 ((B) | |
1447 ("C`" ?,AG(B) | |
1448 ("C~" ?$,1 ,(B) | |
1449 ("D/" ?,AP(B) | |
1450 ("D/" ?$,1 0(B) | |
1451 ("D~" ?$,1 .(B) | |
1452 ("E'" ?,AI(B) | |
1453 ("E-" ?$,1 2(B) | |
1454 ("E/" ?,AF(B) | |
1455 ("E\"" ?,AK(B) | |
1456 ("E^" ?,AJ(B) | |
1457 ("E`" ?,AH(B) | |
1458 ("E`" ?$,1 8(B) | |
1459 ("E~" ?$,1 6(B) | |
1460 ("E~" ?$,1 :(B) | |
1461 ("G/" ?$,1 @(B) | |
1462 ("G^" ?$,1 <(B) | |
1463 ("G`" ?$,1 B(B) | |
1464 ("G~" ?$,1 >(B) | |
1465 ("H/" ?$,1 F(B) | |
1466 ("H^" ?$,1 D(B) | |
1467 ("I'" ?,AM(B) | |
1468 ("I-" ?$,1 J(B) | |
1469 ("I/" ?$,1 P(B) | |
1470 ("I\"" ?,AO(B) | |
1471 ("I^" ?,AN(B) | |
1472 ("I`" ?,AL(B) | |
1473 ("I`" ?$,1 N(B) | |
1474 ("I~" ?$,1 H(B) | |
1475 ("J^" ?$,1 T(B) | |
1476 ("K`" ?$,1 V(B) | |
1477 ("L'" ?$,1 Y(B) | |
1478 ("L/" ?$,1 a(B) | |
1479 ("L`" ?$,1 [(B) | |
1480 ("L~" ?$,1 ](B) | |
1481 ("N'" ?$,1 c(B) | |
1482 ("N/" ?$,1 j(B) | |
1483 ("N`" ?$,1 e(B) | |
1484 ("N~" ?,AQ(B) | |
1485 ("N~" ?$,1 g(B) | |
1486 ("O'" ?,AS(B) | |
1487 ("O-" ?$,1 l(B) | |
1488 ("O/" ?,AX(B) | |
1489 ("O:" ?$,1 p(B) | |
1490 ("O\"" ?,AV(B) | |
1491 ("O^" ?,AT(B) | |
1492 ("O`" ?,AR(B) | |
1493 ("O~" ?,AU(B) | |
1494 ("R'" ?$,1 t(B) | |
1495 ("R`" ?$,1 v(B) | |
1496 ("R~" ?$,1 x(B) | |
1497 ("S'" ?$,1 z(B) | |
1498 ("S^" ?$,1 |(B) | |
1499 ("S`" ?$,1 ~(B) | |
1500 ("S~" ?$,1! (B) | |
1501 ("T/" ?,A^(B) | |
1502 ("T/" ?$,1!&(B) | |
1503 ("T`" ?$,1!"(B) | |
1504 ("T~" ?$,1!$(B) | |
1505 ("U'" ?,AZ(B) | |
1506 ("U-" ?$,1!*(B) | |
1507 ("U:" ?$,1!0(B) | |
1508 ("U\"" ?,A\(B) | |
1509 ("U^" ?,A[(B) | |
1510 ("U`" ?,AY(B) | |
1511 ("U`" ?$,1!.(B) | |
1512 ("U`" ?$,1!2(B) | |
1513 ("U~" ?$,1!((B) | |
1514 ("U~" ?$,1!,(B) | |
1515 ("Y'" ?,A](B) | |
1516 ("Y\"" ?$,1!8(B) | |
1517 ("Y=" ?,A%(B) | |
1518 ("Z'" ?$,1!9(B) | |
1519 ("Z/" ?$,1!;(B) | |
1520 ("Z`" ?$,1!;(B) | |
1521 ("Z~" ?$,1!=(B) | |
1522 ("a'" ?,Aa(B) | |
1523 ("a-" ?$,1 !(B) | |
1524 ("a/" ?,Ae(B) | |
1525 ("a\"" ?,Ad(B) | |
1526 ("a^" ?,Ab(B) | |
1527 ("a_" ?,A*(B) | |
1528 ("a`" ?,A`(B) | |
1529 ("a`" ?$,1 %(B) | |
1530 ("a~" ?,Ac(B) | |
1531 ("a~" ?$,1 #(B) | |
1532 ("c'" ?$,1 '(B) | |
1533 ("c/" ?,Ag(B) | |
1534 ("c/" ?$,1 +(B) | |
1535 ("c/" ?,A"(B) | |
1536 ("c^" ?$,1 )(B) | |
1537 ("c`" ?,Ag(B) | |
1538 ("c~" ?$,1 -(B) | |
1539 ("d/" ?,Ap(B) | |
1540 ("d/" ?$,1 1(B) | |
1541 ("d~" ?$,1 /(B) | |
1542 ("e'" ?,Ai(B) | |
1543 ("e-" ?$,1 3(B) | |
1544 ("e/" ?,Af(B) | |
1545 ("e\"" ?,Ak(B) | |
1546 ("e^" ?,Aj(B) | |
1547 ("e`" ?,Ah(B) | |
1548 ("e`" ?$,1 9(B) | |
1549 ("e~" ?$,1 7(B) | |
1550 ("e~" ?$,1 ;(B) | |
1551 ("e=" ?$,1tL(B) | |
1552 ("g/" ?$,1 A(B) | |
1553 ("g^" ?$,1 =(B) | |
1554 ("g`" ?$,1 C(B) | |
1555 ("g~" ?$,1 ?(B) | |
1556 ("h/" ?$,1 G(B) | |
1557 ("h^" ?$,1 E(B) | |
1558 ("i'" ?,Am(B) | |
1559 ("i-" ?$,1 K(B) | |
1560 ("i/" ?$,1 Q(B) | |
1561 ("i\"" ?,Ao(B) | |
1562 ("i^" ?,An(B) | |
1563 ("i`" ?,Al(B) | |
1564 ("i`" ?$,1 O(B) | |
1565 ("i~" ?$,1 I(B) | |
1566 ("j^" ?$,1 U(B) | |
1567 ("k/" ?$,1 X(B) | |
1568 ("k`" ?$,1 W(B) | |
1569 ("l'" ?$,1 Z(B) | |
1570 ("l/" ?$,1 b(B) | |
1571 ("l`" ?$,1 \(B) | |
1572 ("l~" ?$,1 ^(B) | |
1573 ("n'" ?$,1 d(B) | |
1574 ("n/" ?$,1 k(B) | |
1575 ("n`" ?$,1 f(B) | |
1576 ("n~" ?,Aq(B) | |
1577 ("n~" ?$,1 h(B) | |
1578 ("o'" ?,As(B) | |
1579 ("o-" ?$,1 m(B) | |
1580 ("o/" ?,Ax(B) | |
1581 ("o:" ?$,1 q(B) | |
1582 ("o\"" ?,Av(B) | |
1583 ("o^" ?,At(B) | |
1584 ("o_" ?,A:(B) | |
1585 ("o`" ?,Ar(B) | |
1586 ("o~" ?,Au(B) | |
1587 ("r'" ?$,1 u(B) | |
1588 ("r`" ?$,1 w(B) | |
1589 ("r~" ?$,1 y(B) | |
1590 ("s'" ?$,1 {(B) | |
1591 ("s/" ?,A_(B) | |
1592 ("s^" ?$,1 }(B) | |
1593 ("s`" ?$,1 (B) | |
1594 ("s~" ?$,1!!(B) | |
1595 ("t/" ?,A~(B) | |
1596 ("t/" ?$,1!'(B) | |
1597 ("t`" ?$,1!#(B) | |
1598 ("t~" ?$,1!%(B) | |
1599 ("u'" ?,Az(B) | |
1600 ("u-" ?$,1!+(B) | |
1601 ("u:" ?$,1!1(B) | |
1602 ("u\"" ?,A|(B) | |
1603 ("u^" ?,A{(B) | |
1604 ("u`" ?,Ay(B) | |
1605 ("u`" ?$,1!/(B) | |
1606 ("u`" ?$,1!3(B) | |
1607 ("u~" ?$,1!)(B) | |
1608 ("u~" ?$,1!-(B) | |
1609 ("y'" ?,A}(B) | |
1610 ("y\"" ?,A(B) | |
1611 ("z'" ?$,1!:(B) | |
1612 ("z/" ?$,1!<(B) | |
1613 ("z`" ?$,1!<(B) | |
1614 ("z~" ?$,1!>(B) | |
1615 | |
1616 (" __" [" _"]) | |
1617 ("!//" ["!/"]) | |
1618 ("<<<" ["<<"]) | |
1619 (">>>" [">>"]) | |
1620 ("?//" ["?/"]) | |
1621 ("///" ["//"]) | |
1622 ("$//" ["$/"]) | |
1623 ("A''" ["A'"]) | |
1624 ("A--" ["A-"]) | |
1625 ("A//" ["A/"]) | |
1626 ("A\"\"" ["A\""]) | |
1627 ("A^^" ["A^"]) | |
1628 ("A``" ["A`"]) | |
1629 ("A~~" ["A~"]) | |
1630 ("C''" ["C'"]) | |
1631 ("C//" ["C/"]) | |
1632 ("C^^" ["C^"]) | |
1633 ("C``" ["C`"]) | |
1634 ("C~~" ["C~"]) | |
1635 ("D//" ["D/"]) | |
1636 ("D~~" ["D~"]) | |
1637 ("E''" ["E'"]) | |
1638 ("E--" ["E-"]) | |
1639 ("E//" ["E/"]) | |
1640 ("E\"\"" ["E\""]) | |
1641 ("E^^" ["E^"]) | |
1642 ("E``" ["E`"]) | |
1643 ("E~~" ["E~"]) | |
1644 ("G//" ["G/"]) | |
1645 ("G^^" ["G^"]) | |
1646 ("G``" ["G`"]) | |
1647 ("G~~" ["G~"]) | |
1648 ("H//" ["H/"]) | |
1649 ("H^^" ["H^"]) | |
1650 ("I''" ["I'"]) | |
1651 ("I--" ["I-"]) | |
1652 ("I//" ["I/"]) | |
1653 ("I\"\"" ["I\""]) | |
1654 ("I^^" ["I^"]) | |
1655 ("I``" ["I`"]) | |
1656 ("I~~" ["I~"]) | |
1657 ("J^^" ["J^"]) | |
1658 ("K``" ["K`"]) | |
1659 ("L''" ["L'"]) | |
1660 ("L//" ["L/"]) | |
1661 ("L``" ["L`"]) | |
1662 ("L~~" ["L~"]) | |
1663 ("N''" ["N'"]) | |
1664 ("N//" ["N/"]) | |
1665 ("N``" ["N`"]) | |
1666 ("N~~" ["N~"]) | |
1667 ("O''" ["O'"]) | |
1668 ("O--" ["O-"]) | |
1669 ("O//" ["O/"]) | |
1670 ("O::" ["O:"]) | |
1671 ("O\"\"" ["O\""]) | |
1672 ("O^^" ["O^"]) | |
1673 ("O``" ["O`"]) | |
1674 ("O~~" ["O~"]) | |
1675 ("R''" ["R'"]) | |
1676 ("R``" ["R`"]) | |
1677 ("R~~" ["R~"]) | |
1678 ("S''" ["S'"]) | |
1679 ("S^^" ["S^"]) | |
1680 ("S``" ["S`"]) | |
1681 ("S~~" ["S~"]) | |
1682 ("T//" ["T/"]) | |
1683 ("T``" ["T`"]) | |
1684 ("T~~" ["T~"]) | |
1685 ("U''" ["U'"]) | |
1686 ("U--" ["U-"]) | |
1687 ("U::" ["U:"]) | |
1688 ("U\"\"" ["U\""]) | |
1689 ("U^^" ["U^"]) | |
1690 ("U``" ["U`"]) | |
1691 ("U~~" ["U~"]) | |
1692 ("Y''" ["Y'"]) | |
1693 ("Z''" ["Z'"]) | |
1694 ("Z//" ["Z/"]) | |
1695 ("Z``" ["Z`"]) | |
1696 ("Z~~" ["Z~"]) | |
1697 ("a''" ["a'"]) | |
1698 ("a--" ["a-"]) | |
1699 ("a//" ["a/"]) | |
1700 ("a\"\"" ["a\""]) | |
1701 ("a^^" ["a^"]) | |
1702 ("a__" ["a_"]) | |
1703 ("a``" ["a`"]) | |
1704 ("a~~" ["a~"]) | |
1705 ("c''" ["c'"]) | |
1706 ("c//" ["c/"]) | |
1707 ("c^^" ["c^"]) | |
1708 ("c``" ["c`"]) | |
1709 ("c~~" ["c~"]) | |
1710 ("d//" ["d/"]) | |
1711 ("d~~" ["d~"]) | |
1712 ("e''" ["e'"]) | |
1713 ("e--" ["e-"]) | |
1714 ("e//" ["e/"]) | |
1715 ("e\"\"" ["e\""]) | |
1716 ("e^^" ["e^"]) | |
1717 ("e``" ["e`"]) | |
1718 ("e~~" ["e~"]) | |
1719 ("e==" ["e="]) | |
1720 ("g//" ["g/"]) | |
1721 ("g^^" ["g^"]) | |
1722 ("g``" ["g`"]) | |
1723 ("g~~" ["g~"]) | |
1724 ("h//" ["h/"]) | |
1725 ("h^^" ["h^"]) | |
1726 ("i''" ["i'"]) | |
1727 ("i--" ["i-"]) | |
1728 ("i//" ["i/"]) | |
1729 ("i\"\"" ["i\""]) | |
1730 ("i^^" ["i^"]) | |
1731 ("i``" ["i`"]) | |
1732 ("i~~" ["i~"]) | |
1733 ("j^^" ["j^"]) | |
1734 ("k//" ["k/"]) | |
1735 ("k``" ["k`"]) | |
1736 ("l''" ["l'"]) | |
1737 ("l//" ["l/"]) | |
1738 ("l``" ["l`"]) | |
1739 ("l~~" ["l~"]) | |
1740 ("n''" ["n'"]) | |
1741 ("n//" ["n/"]) | |
1742 ("n``" ["n`"]) | |
1743 ("n~~" ["n~"]) | |
1744 ("o''" ["o'"]) | |
1745 ("o--" ["o-"]) | |
1746 ("o//" ["o/"]) | |
1747 ("o::" ["o:"]) | |
1748 ("o\"\"" ["o\""]) | |
1749 ("o^^" ["o^"]) | |
1750 ("o__" ["o_"]) | |
1751 ("o``" ["o`"]) | |
1752 ("o~~" ["o~"]) | |
1753 ("r''" ["r'"]) | |
1754 ("r``" ["r`"]) | |
1755 ("r~~" ["r~"]) | |
1756 ("s''" ["s'"]) | |
1757 ("s//" ["s/"]) | |
1758 ("s^^" ["s^"]) | |
1759 ("s``" ["s`"]) | |
1760 ("s~~" ["s~"]) | |
1761 ("t//" ["t/"]) | |
1762 ("t``" ["t`"]) | |
1763 ("t~~" ["t~"]) | |
1764 ("u''" ["u'"]) | |
1765 ("u--" ["u-"]) | |
1766 ("u::" ["u:"]) | |
1767 ("u\"\"" ["u\""]) | |
1768 ("u^^" ["u^"]) | |
1769 ("u``" ["u`"]) | |
1770 ("u~~" ["u~"]) | |
1771 ("y''" ["y'"]) | |
1772 ("y\"\"" ["y\""]) | |
1773 ("z''" ["z'"]) | |
1774 ("z//" ["z/"]) | |
1775 ("z``" ["z`"]) | |
1776 ("z~~" ["z~"]) | |
1777 ) | |
1778 | |
52401 | 1779 ;;; arch-tag: 722466a6-363d-431c-9161-879e16e2da5d |
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
34937
diff
changeset
|
1780 ;;; latin-alt.el ends here |