?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
*** empty log message ***
[emacs.git] / leim / quail / latin-pre.el
blobf0557427f36ac0d80ad39f0dd637d4857c7b34dd
1 ;;; latin-pre.el -- 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: mule, multilingual, latin, input method
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 ;;; Commentary:
26
27 ;; All key translation maps are copied from iso-acc.el.
28 ;; Latin-1-prefix: extra special characters added, adapted from the vim
29 ;; digraphs (from J.H.M.Dassen <jdassen@wi.leidenuniv.nl>)
30 ;; by R.F. Smith <rsmith@xs4all.nl>
31
32 ;;; Code:
33
34 (require 'quail)
35
36 (quail-define-package
37 "latin-1-prefix" "Latin-1" "1>" t
38 "Latin-1 characters input method with prefix modifiers
39
40 effect | prefix | examples
41 ------------+--------+----------
42 acute | ' | 'a -> \e,Aa\e(B, '' -> \e,A4\e(B
43 grave | ` | `a -> \e,A`\e(B
44 circumflex | ^ | ^a -> \e,Ab\e(B
45 diaeresis | \" | \"a -> \e,Ad\e(B \"\" -> \e,A(\e(B
46 tilde | ~ | ~a -> \e,Ac\e(B
47 cedilla | ~ | ~c -> \e,Ag\e(B
48 misc | \" ~ / | \"s -> \e,A_\e(B ~d -> \e,Ap\e(B ~t -> \e,A~\e(B /a -> \e,Ae\e(B /e -> \e,Af\e(B /o -> \e,Ax\e(B
49 symbol | ~ | ~> -> \e,A;\e(B ~< -> \e,A+\e(B ~! -> \e,A!\e(B ~? -> \e,A?\e(B ~~ -> \e,A8\e(B
50 | ~ | ~p -> \e,A'\e(B ~x -> \e,A$\e(B ~. -> \e,A7\e(B ~$ -> \e,A#\e(B ~u -> \e,A5\e(B
51 symbol | _ / | _o -> \e,A:\e(B _a -> \e,A*\e(B // -> \e,A0\e(B /\\ -> \e,AW\e(B _y -> \e,A%\e(B
52 | _ / | _: -> \e,Aw\e(B /c -> \e,A"\e(B /2 -> \e,A=\e(B /4 -> \e,A<\e(B /3 -> \e,A>\e(B
53 symbol | ^ | ^r -> \e,A.\e(B ^c -> \e,A)\e(B ^2 -> \e,A2\e(B ^3 -> \e,A3\e(B
54 " nil t nil nil nil nil nil nil nil nil t)
55
56 (quail-define-rules
57 ("'A" ?\e,AA\e(B)
58 ("'E" ?\e,AI\e(B)
59 ("'I" ?\e,AM\e(B)
60 ("'O" ?\e,AS\e(B)
61 ("'U" ?\e,AZ\e(B)
62 ("'Y" ?\e,A]\e(B)
63 ("'a" ?\e,Aa\e(B)
64 ("'e" ?\e,Ai\e(B)
65 ("'i" ?\e,Am\e(B)
66 ("'o" ?\e,As\e(B)
67 ("'u" ?\e,Az\e(B)
68 ("'y" ?\e,A}\e(B)
69 ("''" ?\e,A4\e(B)
70 ("' " ?')
71 ("`A" ?\e,A@\e(B)
72 ("`E" ?\e,AH\e(B)
73 ("`I" ?\e,AL\e(B)
74 ("`O" ?\e,AR\e(B)
75 ("`U" ?\e,AY\e(B)
76 ("`a" ?\e,A`\e(B)
77 ("`e" ?\e,Ah\e(B)
78 ("`i" ?\e,Al\e(B)
79 ("`o" ?\e,Ar\e(B)
80 ("`u" ?\e,Ay\e(B)
81 ("``" ?`)
82 ("` " ?`)
83 ("^A" ?\e,AB\e(B)
84 ("^E" ?\e,AJ\e(B)
85 ("^I" ?\e,AN\e(B)
86 ("^O" ?\e,AT\e(B)
87 ("^U" ?\e,A[\e(B)
88 ("^a" ?\e,Ab\e(B)
89 ("^e" ?\e,Aj\e(B)
90 ("^i" ?\e,An\e(B)
91 ("^o" ?\e,At\e(B)
92 ("^u" ?\e,A{\e(B)
93 ("^^" ?^)
94 ("^ " ?^)
95 ("\"A" ?\e,AD\e(B)
96 ("\"E" ?\e,AK\e(B)
97 ("\"I" ?\e,AO\e(B)
98 ("\"O" ?\e,AV\e(B)
99 ("\"U" ?\e,A\\e(B)
100 ("\"a" ?\e,Ad\e(B)
101 ("\"e" ?\e,Ak\e(B)
102 ("\"i" ?\e,Ao\e(B)
103 ("\"o" ?\e,Av\e(B)
104 ("\"s" ?\e,A_\e(B)
105 ("\"u" ?\e,A|\e(B)
106 ("\"y" ?\e,A\x7f\e(B)
107 ("\"\"" ?\e,A(\e(B)
108 ("\" " ?\")
109 ("~A" ?\e,AC\e(B)
110 ("~C" ?\e,AG\e(B)
111 ("~D" ?\e,AP\e(B)
112 ("~N" ?\e,AQ\e(B)
113 ("~O" ?\e,AU\e(B)
114 ("~T" ?\e,A^\e(B)
115 ("~a" ?\e,Ac\e(B)
116 ("~c" ?\e,Ag\e(B)
117 ("~d" ?\e,Ap\e(B)
118 ("~n" ?\e,Aq\e(B)
119 ("~o" ?\e,Au\e(B)
120 ("~t" ?\e,A~\e(B)
121 ("~>" ?\\e,A;\e(B)
122 ("~<" ?\\e,A+\e(B)
123 ("~!" ?\e,A!\e(B)
124 ("~?" ?\e,A?\e(B)
125 ("~~" ?\e,A8\e(B)
126 ("~ " ?~)
127 ("/A" ?\e,AE\e(B)
128 ("/E" ?\e,AF\e(B)
129 ("/O" ?\e,AX\e(B)
130 ("/a" ?\e,Ae\e(B)
131 ("/e" ?\e,Af\e(B)
132 ("/o" ?\e,Ax\e(B)
133 ("//" ?\e,A0\e(B)
134 ("/ " ?/)
135 ("_o" ?\e,A:\e(B)
136 ("_a" ?\e,A*\e(B)
137 ;; Symbols added by Roland Smith <rsmith@xs4all.nl>
138 ("_+" ?\e,A1\e(B)
139 ("_y" ?\e,A%\e(B)
140 ("_:" ?\e,Aw\e(B)
141 ("/c" ?\e,A"\e(B)
142 ("/\\" ?\e,AW\e(B)
143 ("/2" ?\e,A=\e(B)
144 ("/4" ?\e,A<\e(B)
145 ("/3" ?\e,A>\e(B)
146 ("~p" ?\e,A'\e(B)
147 ("~x" ?\e,A$\e(B)
148 ("~." ?\e,A7\e(B)
149 ("~$" ?\e,A#\e(B)
150 ("~u" ?\e,A5\e(B)
151 ("^r" ?\e,A.\e(B)
152 ("^c" ?\e,A)\e(B)
153 ("^2" ?\e,A2\e(B)
154 ("^3" ?\e,A3\e(B)
155 )
156
157 (quail-define-package
158 "catalan-prefix" "Latin-1" "CA>" t
159 "Catalan and Spanish input method with prefix modifiers
160
161 effect | prefix | examples
162 ------------+--------+----------
163 acute | ' | 'a -> \e,Aa\e(B '' -> \e,A4\e(B
164 grave | ` | `a -> \e,A`\e(B
165 diaeresis | \" | \"i -> \e,Ao\e(B \"\" -> \e,A(\e(B
166 tilde | ~ | ~n -> \e,Aq\e(B
167 cedilla | ~ | ~c -> \e,Ag\e(B
168 symbol | ~ | ~> -> \e,A;\e(B ~< -> \e,A+\e(B ~! -> \e,A!\e(B ~? -> \e,A?\e(B
169 " nil t nil nil nil nil nil nil nil nil t)
170
171 (quail-define-rules
172 ("'A" ?\e,AA\e(B)
173 ("'E" ?\e,AI\e(B)
174 ("'I" ?\e,AM\e(B)
175 ("'O" ?\e,AS\e(B)
176 ("'U" ?\e,AZ\e(B)
177 ("'a" ?\e,Aa\e(B)
178 ("'e" ?\e,Ai\e(B)
179 ("'i" ?\e,Am\e(B)
180 ("'o" ?\e,As\e(B)
181 ("'u" ?\e,Az\e(B)
182 ("' " ?')
183 ("`A" ?\e,A@\e(B)
184 ("`E" ?\e,AH\e(B)
185 ("`O" ?\e,AR\e(B)
186 ("`a" ?\e,A`\e(B)
187 ("`e" ?\e,Ah\e(B)
188 ("`o" ?\e,Ar\e(B)
189 ("` " ?`)
190 ("\"I" ?\e,AO\e(B)
191 ("\"U" ?\e,A\\e(B)
192 ("\"i" ?\e,Ao\e(B)
193 ("\"u" ?\e,A|\e(B)
194 ("\" " ?\")
195 ("~C" ?\e,AG\e(B)
196 ("~N" ?\e,AQ\e(B)
197 ("~c" ?\e,Ag\e(B)
198 ("~n" ?\e,Aq\e(B)
199 ("~>" ?\\e,A;\e(B)
200 ("~<" ?\\e,A+\e(B)
201 ("~!" ?\e,A!\e(B)
202 ("~?" ?\e,A?\e(B)
203 ("~ " ?~)
204 )
205
206 (quail-define-package
207 "esperanto-prefix" "Latin-3" "EO>" t
208 "Esperanto input method with prefix modifiers
209 Key translation rules are:
210 ^H -> ?\e,C&\e(B ^J -> ?\e,C,\e(B ^h -> ?\e,C6\e(B ^j -> ?\e,C<\e(B ^C -> ?\e,CF\e(B ^G -> ?\e,CX\e(B,
211 ^S -> ?\e,C^\e(B ^c -> ?\e,Cf\e(B ^g -> ?\e,Cx\e(B ^s -> ?\e,C~\e(B ~U -> ?\e,C]\e(B ~u -> ?\e,C}\e(B
212 " nil t nil nil nil nil nil nil nil nil t)
213
214 (quail-define-rules
215 ("^H" ?\e,C&\e(B)
216 ("^J" ?\e,C,\e(B)
217 ("^h" ?\e,C6\e(B)
218 ("^j" ?\e,C<\e(B)
219 ("^C" ?\e,CF\e(B)
220 ("^G" ?\e,CX\e(B)
221 ("^S" ?\e,C^\e(B)
222 ("^c" ?\e,Cf\e(B)
223 ("^g" ?\e,Cx\e(B)
224 ("^s" ?\e,C~\e(B)
225 ("^^" ?^)
226 ("^ " ?^)
227 ("~U" ?\e,C]\e(B)
228 ("~u" ?\e,C}\e(B)
229 ("~ " ?~)
230 )
231
232 (quail-define-package
233 "french-prefix" "Latin-1" "FR>" t
234 "French (Fran\e,Ag\e(Bais) input method with prefix modifiers
235
236 effect | prefix | examples
237 ------------+--------+----------
238 acute | ' | 'e -> \e,Ai\e(B
239 grave | ` | `a -> \e,A`\e(B
240 circumflex | ^ | ^a -> \e,Ab\e(B
241 diaeresis | \" | \"i -> \e,Ao\e(B
242 cedilla | ~ or , | ~c -> \e,Ag\e(B ,c -> \e,Ag\e(B
243 symbol | ~ | ~> -> \e,A;\e(B ~< -> \e,A+\e(B
244 " nil t nil nil nil nil nil nil nil nil t)
245
246 (quail-define-rules
247 ("'E" ?\e,AI\e(B)
248 ("'C" ?\e,AG\e(B)
249 ("'e" ?\e,Ai\e(B)
250 ("'c" ?\e,Ag\e(B)
251 ("' " ?')
252 ("`A" ?\e,A@\e(B)
253 ("`E" ?\e,AH\e(B)
254 ("`U" ?\e,AY\e(B)
255 ("`a" ?\e,A`\e(B)
256 ("`e" ?\e,Ah\e(B)
257 ("`u" ?\e,Ay\e(B)
258 ("` " ?`)
259 ("^A" ?\e,AB\e(B)
260 ("^E" ?\e,AJ\e(B)
261 ("^I" ?\e,AN\e(B)
262 ("^O" ?\e,AT\e(B)
263 ("^U" ?\e,A[\e(B)
264 ("^a" ?\e,Ab\e(B)
265 ("^e" ?\e,Aj\e(B)
266 ("^i" ?\e,An\e(B)
267 ("^o" ?\e,At\e(B)
268 ("^u" ?\e,A{\e(B)
269 ("^ " ?^)
270 ("\"E" ?\e,AK\e(B)
271 ("\"I" ?\e,AO\e(B)
272 ("\"e" ?\e,Ak\e(B)
273 ("\"i" ?\e,Ao\e(B)
274 ("\" " ?\")
275 ("~<" ?\\e,A+\e(B)
276 ("~>" ?\\e,A;\e(B)
277 ("~C" ?\e,AG\e(B)
278 ("~c" ?\e,Ag\e(B)
279 ("~," ?,)
280 (",C" ?\e,AG\e(B)
281 (",c" ?\e,Ag\e(B)
282 (", " ?~)
283 )
284
285 (quail-define-package
286 "romanian-prefix" "Romanian" "RO>" t
287 "Romanian (rom\e,Bb\e(Bne\e,B:\e(Bte) input method with prefix modifiers
288
289 effect | prefix | examples
290 ------------+--------+------------------
291 tilde | ~ | ~a -> \e,Bc\e(B
292 circumflex | ^ | ^a -> \e,Bb\e(B, ^i -> \e,Bn\e(B
293 cedilla | , | ,s -> \e,B:\e(B, ,t -> \e,B~\e(B
294 ~ | ~ | ~~ -> ~
295 ^ | ^ | ^^ -> ^
296 , | , | ,, -> ,
297 " nil t nil nil nil nil nil nil nil nil t)
298
299 (quail-define-rules
300 ("~A" ?\e,BC\e(B) ("~a" ?\e,Bc\e(B)
301 ("^A" ?\e,BB\e(B) ("^a" ?\e,Bb\e(B)
302 ("^I" ?\e,BN\e(B) ("^i" ?\e,Bn\e(B)
303 (",S" ?\e,B*\e(B) (",s" ?\e,B:\e(B)
304 (",T" ?\e,B^\e(B) (",t" ?\e,B~\e(B)
305 ("^^" ?^) ("~~" ?~) (",," ?,))
306
307 (quail-define-package
308 "romanian-alt-prefix" "Romanian" "RO>" t
309 "Alternative Romanian (rom\e,Bb\e(Bne\e,B:\e(Bte) input method with prefix modifiers
310
311 effect | prefix | examples
312 ------------+--------+------------------
313 tilde | \" | \"a -> \e,Bb\e(B
314 circumflex | ' | 'a -> \e,Bb\e(B, 'i -> \e,Bn\e(B
315 cedilla | ' | 's -> \e,B:\e(B, 't -> \e,B~\e(B
316 ' | ' | '' -> '
317 \" | \" | \"\" -> \"
318 " nil t nil nil nil nil nil nil nil nil t)
319
320 (quail-define-rules
321 ("'A" ?\e,BC\e(B) ("'a" ?\e,Bc\e(B)
322 ("\"A" ?\e,BB\e(B) ("\"a" ?\e,Bb\e(B)
323 ("'I" ?\e,BN\e(B) ("'i" ?\e,Bn\e(B)
324 ("'S" ?\e,B*\e(B) ("'s" ?\e,B:\e(B)
325 ("'T" ?\e,B^\e(B) ("'t" ?\e,B~\e(B)
326 ("''" ?') ("\"\"" ?\"))
327
328 (quail-define-package
329 "german-prefix" "Latin-1" "DE>" t
330 "German (Deutsch) input method with prefix modifiers
331 Key translation rules are:
332 \"A -> \e,AD\e(B -> \"O -> \e,AV\e(B \"U -> \e,A\\e(B \"s -> ?\e,A_\e(B
333 " nil t nil nil nil nil nil nil nil nil t)
334
335 (quail-define-rules
336 ("\"A" ?\e,AD\e(B)
337 ("\"O" ?\e,AV\e(B)
338 ("\"U" ?\e,A\\e(B)
339 ("\"a" ?\e,Ad\e(B)
340 ("\"o" ?\e,Av\e(B)
341 ("\"u" ?\e,A|\e(B)
342 ("\"s" ?\e,A_\e(B)
343 ("\" " ?\")
344 )
345
346 (quail-define-package
347 "irish-prefix" "Latin-1" "GA>" t
348 "Irish input method with prefix modifiers
349 Key translation rules are:
350 'A -> \e,AA\e(B 'E -> \e,AI\e(B 'I -> \e,AM\e(B 'O -> \e,AS\e(B 'U -> \e,AZ\e(B
351 " nil t nil nil nil nil nil nil nil nil t)
352
353 (quail-define-rules
354 ("'A" ?\e,AA\e(B)
355 ("'E" ?\e,AI\e(B)
356 ("'I" ?\e,AM\e(B)
357 ("'O" ?\e,AS\e(B)
358 ("'U" ?\e,AZ\e(B)
359 ("'a" ?\e,Aa\e(B)
360 ("'e" ?\e,Ai\e(B)
361 ("'i" ?\e,Am\e(B)
362 ("'o" ?\e,As\e(B)
363 ("'u" ?\e,Az\e(B)
364 ("' " ?')
365 )
366
367 (quail-define-package
368 "portuguese-prefix" "Latin-1" "PT>" t
369 "Portuguese input method with prefix modifiers
370
371 effect | prefix | examples
372 ------------+--------+----------
373 acute | ' | 'a -> \e,Aa\e(B '' -> \e,A4\e(B
374 grave | ` | `a -> \e,A`\e(B
375 circumflex | ^ | ^a -> \e,Ab\e(B
376 diaeresis | \" | \"u -> \e,A|\e(B
377 tilde | ~ | ~a -> \e,Ac\e(B
378 cedilla | ' or , | 'c -> \e,Ag\e(B ,c -> \e,Ag\e(B
379 " nil t nil nil nil nil nil nil nil nil t)
380
381 (quail-define-rules
382 ("'A" ?\e,AA\e(B)
383 ("'E" ?\e,AI\e(B)
384 ("'I" ?\e,AM\e(B)
385 ("'O" ?\e,AS\e(B)
386 ("'U" ?\e,AZ\e(B)
387 ("'C" ?\e,AG\e(B)
388 ("'a" ?\e,Aa\e(B)
389 ("'e" ?\e,Ai\e(B)
390 ("'i" ?\e,Am\e(B)
391 ("'o" ?\e,As\e(B)
392 ("'u" ?\e,Az\e(B)
393 ("'c" ?\e,Ag\e(B)
394 ("' " ?')
395 ("`A" ?\e,A@\e(B)
396 ("`a" ?\e,A`\e(B)
397 ("` " ?`)
398 ("^A" ?\e,AB\e(B)
399 ("^E" ?\e,AJ\e(B)
400 ("^O" ?\e,AT\e(B)
401 ("^a" ?\e,Ab\e(B)
402 ("^e" ?\e,Aj\e(B)
403 ("^o" ?\e,At\e(B)
404 ("^ " ?^)
405 ("\"U" ?\e,A\\e(B)
406 ("\"u" ?\e,A|\e(B)
407 ("\" " ?\")
408 ("~A" ?\e,AC\e(B)
409 ("~O" ?\e,AU\e(B)
410 ("~a" ?\e,Ac\e(B)
411 ("~o" ?\e,Au\e(B)
412 ("~ " ?~)
413 (",c" ?\e,Ag\e(B)
414 (",C" ?\e,AG\e(B)
415 (",," ?,)
416 )
417
418 (quail-define-package
419 "spanish-prefix" "Latin-1" "ES>" t
420 "Spanish (Espa\e,Aq\e(Bol) input method with prefix modifiers
421
422 effect | prefix | examples
423 ------------+--------+----------
424 acute | ' | 'a -> \e,Aa\e(B
425 diaeresis | \" | \"u -> \e,A|\e(B
426 tilde | ~ | ~n -> \e,Aq\e(B
427 symbol | ~ | ~> -> \e,A;\e(B ~< -> \e,A+\e(B ~! -> \e,A!\e(B ~? -> \e,A?\e(B
428 " nil t nil nil nil nil nil nil nil nil t)
429
430 (quail-define-rules
431 ("'A" ?\e,AA\e(B)
432 ("'E" ?\e,AI\e(B)
433 ("'I" ?\e,AM\e(B)
434 ("'O" ?\e,AS\e(B)
435 ("'U" ?\e,AZ\e(B)
436 ("'a" ?\e,Aa\e(B)
437 ("'e" ?\e,Ai\e(B)
438 ("'i" ?\e,Am\e(B)
439 ("'o" ?\e,As\e(B)
440 ("'u" ?\e,Az\e(B)
441 ("' " ?')
442 ("\"U" ?\e,A\\e(B)
443 ("\"u" ?\e,A|\e(B)
444 ("\" " ?\")
445 ("~N" ?\e,AQ\e(B)
446 ("~n" ?\e,Aq\e(B)
447 ("~>" ?\\e,A;\e(B)
448 ("~<" ?\\e,A+\e(B)
449 ("~!" ?\e,A!\e(B)
450 ("~?" ?\e,A?\e(B)
451 ("~ " ?~)
452 )
453
454 (quail-define-package
455 "latin-2-prefix" "Latin-2" "2>" t
456 "Latin-2 characters input method with prefix modifiers
457
458 effect | prefix | examples
459 ------------+--------+----------
460 acute | ' | 'a -> \e,Ba\e(B '' -> ?\e,B4\e(B
461 circumflex | ^ | ^a -> \e,Bb\e(B
462 diaeresis | \" | \"a -> \e,Bd\e(B \"\" -> \e,B(\e(B
463 breve | ~ | ~a -> \e,Bc\e(B
464 caron | ~ | ~c -> \e,Bh\e(B
465 cedilla | ` | `c -> \e,Bg\e(B `e -> ?\e,Bj\e(B
466 misc | ' ` ~ | 'd -> \e,Bp\e(B `l -> \e,B3\e(B `z -> \e,B?\e(B ~o -> \e,Bu\e(B ~u -> \e,B{\e(B
467 symbol | ~ | `. -> \e,B\x7f\e(B ~~ -> \e,B"\e(B ~. -> ?\e,B8\e(B
468 " nil t nil nil nil nil nil nil nil nil t)
469
470 (quail-define-rules
471 ("'A" ?\e,BA\e(B)
472 ("'C" ?\e,BF\e(B)
473 ("'D" ?\e,BP\e(B)
474 ("'E" ?\e,BI\e(B)
475 ("'I" ?\e,BM\e(B)
476 ("'L" ?\e,BE\e(B)
477 ("'N" ?\e,BQ\e(B)
478 ("'O" ?\e,BS\e(B)
479 ("'R" ?\e,B@\e(B)
480 ("'S" ?\e,B&\e(B)
481 ("'U" ?\e,BZ\e(B)
482 ("'Y" ?\e,B]\e(B)
483 ("'Z" ?\e,B,\e(B)
484 ("'a" ?\e,Ba\e(B)
485 ("'c" ?\e,Bf\e(B)
486 ("'d" ?\e,Bp\e(B)
487 ("'e" ?\e,Bi\e(B)
488 ("'i" ?\e,Bm\e(B)
489 ("'l" ?\e,Be\e(B)
490 ("'n" ?\e,Bq\e(B)
491 ("'o" ?\e,Bs\e(B)
492 ("'r" ?\e,B`\e(B)
493 ("'s" ?\e,B6\e(B)
494 ("'u" ?\e,Bz\e(B)
495 ("'y" ?\e,B}\e(B)
496 ("'z" ?\e,B<\e(B)
497 ("''" ?\e,B4\e(B)
498 ("' " ?')
499 ("`A" ?\e,B!\e(B)
500 ("`C" ?\e,BG\e(B)
501 ("`E" ?\e,BJ\e(B)
502 ("`L" ?\e,B#\e(B)
503 ("`S" ?\e,B*\e(B)
504 ("`T" ?\e,B^\e(B)
505 ("`Z" ?\e,B/\e(B)
506 ("`a" ?\e,B1\e(B)
507 ("`l" ?\e,B3\e(B)
508 ("`c" ?\e,Bg\e(B)
509 ("`e" ?\e,Bj\e(B)
510 ("`s" ?\e,B:\e(B)
511 ("`t" ?\e,B~\e(B)
512 ("`z" ?\e,B?\e(B)
513 ("``" ?\e,B*\e(B)
514 ("`." ?\e,B\x7f\e(B)
515 ("` " ?`)
516 ("^A" ?\e,BB\e(B)
517 ("^I" ?\e,BN\e(B)
518 ("^O" ?\e,BT\e(B)
519 ("^a" ?\e,Bb\e(B)
520 ("^i" ?\e,Bn\e(B)
521 ("^o" ?\e,Bt\e(B)
522 ("^^" ?^)
523 ("^ " ?^)
524 ("\"A" ?\e,BD\e(B)
525 ("\"E" ?\e,BK\e(B)
526 ("\"O" ?\e,BV\e(B)
527 ("\"U" ?\e,B\\e(B)
528 ("\"a" ?\e,Bd\e(B)
529 ("\"e" ?\e,Bk\e(B)
530 ("\"o" ?\e,Bv\e(B)
531 ("\"s" ?\e,B_\e(B)
532 ("\"u" ?\e,B|\e(B)
533 ("\"\"" ?\e,B(\e(B)
534 ("\" " ?\")
535 ("~A" ?\e,BC\e(B)
536 ("~C" ?\e,BH\e(B)
537 ("~D" ?\e,BO\e(B)
538 ("~L" ?\e,B%\e(B)
539 ("~N" ?\e,BR\e(B)
540 ("~O" ?\e,BU\e(B)
541 ("~R" ?\e,BX\e(B)
542 ("~S" ?\e,B)\e(B)
543 ("~T" ?\e,B+\e(B)
544 ("~U" ?\e,B[\e(B)
545 ("~Z" ?\e,B.\e(B)
546 ("~a" ?\e,Bc\e(B)
547 ("~c" ?\e,Bh\e(B)
548 ("~d" ?\e,Bo\e(B)
549 ("~l" ?\e,B5\e(B)
550 ("~n" ?\e,Br\e(B)
551 ("~o" ?\e,Bu\e(B)
552 ("~r" ?\e,Bx\e(B)
553 ("~s" ?\e,B9\e(B)
554 ("~t" ?\e,B;\e(B)
555 ("~u" ?\e,B{\e(B)
556 ("~z" ?\e,B>\e(B)
557 ("~v" ?\e,B"\e(B)
558 ("~~" ?\e,B"\e(B)
559 ("~." ?\e,B8\e(B)
560 ("~ " ?~)
561 )
562
563 (quail-define-package
564 "latin-3-prefix" "Latin-3" "3>" t
565 "Latin-3 characters input method with prefix modifiers
566
567 effect | prefix | examples
568 ------------+--------+----------
569 acute | ' | 'a -> \e,Ca\e(B '' -> ?\e,C4\e(B
570 grave | ` | `a -> \e,C`\e(B
571 circumflex | ^ | ^a -> \e,Cb\e(B
572 diaeresis | \" | \"a -> \e,Cd\e(B \"\" -> \e,C(\e(B
573 cedilla | ~ | ~c -> \e,Cg\e(B ~s -> \e,C:\e(B ~~ -> \e,C8\e(B
574 dot above | ~ / . | ~o -> \e,Cu\e(B /o -> \e,Cu\e(B .o -> \e,Cu\e(B
575 misc | \" ~ / | \"s -> \e,C_\e(B ~g -> \e,C;\e(B ~u -> \e,C}\e(B /h -> \e,C1\e(B /i -> \e,C9\e(B
576 symbol | ~ | ~` -> \e,C"\e(B /# -> \e,C#\e(B /$ -> \e,C$\e(B // -> \e,C0\e(B
577 " nil t nil nil nil nil nil nil nil nil t)
578
579 (quail-define-rules
580 ("'A" ?\e,CA\e(B)
581 ("'E" ?\e,CI\e(B)
582 ("'I" ?\e,CM\e(B)
583 ("'O" ?\e,CS\e(B)
584 ("'U" ?\e,CZ\e(B)
585 ("'a" ?\e,Ca\e(B)
586 ("'e" ?\e,Ci\e(B)
587 ("'i" ?\e,Cm\e(B)
588 ("'o" ?\e,Cs\e(B)
589 ("'u" ?\e,Cz\e(B)
590 ("''" ?\e,C4\e(B)
591 ("' " ?')
592 ("`A" ?\e,C@\e(B)
593 ("`E" ?\e,CH\e(B)
594 ("`I" ?\e,CL\e(B)
595 ("`O" ?\e,CR\e(B)
596 ("`U" ?\e,CY\e(B)
597 ("`a" ?\e,C`\e(B)
598 ("`e" ?\e,Ch\e(B)
599 ("`i" ?\e,Cl\e(B)
600 ("`o" ?\e,Cr\e(B)
601 ("`u" ?\e,Cy\e(B)
602 ("``" ?`)
603 ("` " ?`)
604 ("^A" ?\e,CB\e(B)
605 ("^C" ?\e,CF\e(B)
606 ("^E" ?\e,CJ\e(B)
607 ("^G" ?\e,CX\e(B)
608 ("^H" ?\e,C&\e(B)
609 ("^I" ?\e,CN\e(B)
610 ("^J" ?\e,C,\e(B)
611 ("^O" ?\e,CT\e(B)
612 ("^S" ?\e,C^\e(B)
613 ("^U" ?\e,C[\e(B)
614 ("^a" ?\e,Cb\e(B)
615 ("^c" ?\e,Cf\e(B)
616 ("^e" ?\e,Cj\e(B)
617 ("^g" ?\e,Cx\e(B)
618 ("^h" ?\e,C6\e(B)
619 ("^i" ?\e,Cn\e(B)
620 ("^j" ?\e,C<\e(B)
621 ("^o" ?\e,Ct\e(B)
622 ("^s" ?\e,C~\e(B)
623 ("^u" ?\e,C{\e(B)
624 ("^^" ?^)
625 ("^ " ?^)
626 ("\"A" ?\e,CD\e(B)
627 ("\"E" ?\e,CK\e(B)
628 ("\"I" ?\e,CO\e(B)
629 ("\"O" ?\e,CV\e(B)
630 ("\"U" ?\e,C\\e(B)
631 ("\"a" ?\e,Cd\e(B)
632 ("\"e" ?\e,Ck\e(B)
633 ("\"i" ?\e,Co\e(B)
634 ("\"o" ?\e,Cv\e(B)
635 ("\"u" ?\e,C|\e(B)
636 ("\"s" ?\e,C_\e(B)
637 ("\"\"" ?\e,C(\e(B)
638 ("\" " ?\")
639 ("~A" ?\e,CC\e(B)
640 ("~C" ?\e,CG\e(B)
641 ("~D" ?\e,CP\e(B)
642 ("~N" ?\e,CQ\e(B)
643 ("~O" ?\e,CU\e(B)
644 ("~a" ?\e,Cc\e(B)
645 ("~c" ?\e,Cg\e(B)
646 ("~d" ?\e,Cp\e(B)
647 ("~n" ?\e,Cq\e(B)
648 ("~o" ?\e,Cu\e(B)
649 ("~$" ?\e,C%\e(B)
650 ("~S" ?\e,C*\e(B)
651 ("~s" ?\e,C:\e(B)
652 ("~G" ?\e,C+\e(B)
653 ("~g" ?\e,C;\e(B)
654 ("~U" ?\e,C]\e(B)
655 ("~u" ?\e,C}\e(B)
656 ("~`" ?\e,C"\e(B)
657 ("~~" ?\e,C8\e(B)
658 ("~ " ?~)
659 ("/C" ?\e,CE\e(B)
660 ("/G" ?\e,CU\e(B)
661 ("/H" ?\e,C!\e(B)
662 ("/I" ?\e,C)\e(B)
663 ("/Z" ?\e,C/\e(B)
664 ("/c" ?\e,Ce\e(B)
665 ("/g" ?\e,Cu\e(B)
666 ("/h" ?\e,C1\e(B)
667 ("/i" ?\e,C9\e(B)
668 ("/z" ?\e,C?\e(B)
669 ("/r" ?\e,C.\e(B)
670 ("/." ?\e,C\x7f\e(B)
671 ("/#" ?\e,C#\e(B)
672 ("/$" ?\e,C$\e(B)
673 ("//" ?\e,C0\e(B)
674 ("/ " ?/)
675 (".C" ?\e,CE\e(B)
676 (".G" ?\e,CU\e(B)
677 (".I" ?\e,C)\e(B)
678 (".Z" ?\e,C/\e(B)
679 (".c" ?\e,Ce\e(B)
680 (".g" ?\e,Cu\e(B)
681 (".z" ?\e,C?\e(B)
682 )
Emacs repository mirror