HCoop / bpt / emacs.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
("french-prefix", "german-prefix")
[bpt/emacs.git] / leim / quail / latin-pre.el
1 ;;; latin-pre.el --- Quail packages for inputting various European characters -*-coding: iso-2022-7bit;-*-
2
3 ;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
4 ;; Licensed to the Free Software Foundation.
5 ;; Copyright (C) 2000 Free Software Foundation, Inc.
6
7 ;; Keywords: mule, multilingual, latin, input method
8
9 ;; This file is part of GNU Emacs.
10
11 ;; GNU Emacs is free software; you can redistribute it and/or modify
12 ;; it under the terms of the GNU General Public License as published by
13 ;; the Free Software Foundation; either version 2, or (at your option)
14 ;; any later version.
15
16 ;; GNU Emacs is distributed in the hope that it will be useful,
17 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
18 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 ;; GNU General Public License for more details.
20
21 ;; You should have received a copy of the GNU General Public License
22 ;; along with GNU Emacs; see the file COPYING. If not, write to the
23 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
24 ;; Boston, MA 02111-1307, USA.
25
26 ;;; Commentary:
27
28 ;; Key translation maps were originally copied from iso-acc.el.
29 ;; latin-1-prefix: extra special characters added, adapted from the vim
30 ;; digraphs (from J.H.M.Dassen <jdassen@wi.leidenuniv.nl>)
31 ;; by R.F. Smith <rsmith@xs4all.nl>
32 ;;
33 ;; polish-slash:
34 ;; Author: W\e,B3\e(Bodek Bzyl <matwb@univ.gda.pl>
35 ;; Maintainer: W\e,B3\e(Bodek Bzyl <matwb@univ.gda.pl>
36 ;;
37 ;; latin-[89]-prefix: Dave Love <fx@gnu.org>
38
39 ;;; Code:
40
41 (require 'quail)
42
43 (quail-define-package
44 "latin-1-prefix" "Latin-1" "1>" t
45 "Latin-1 characters input method with prefix modifiers
46
47 effect | prefix | examples
48 ------------+--------+----------
49 acute | ' | 'a -> \e,Aa\e(B, '' -> \e,A4\e(B
50 grave | ` | `a -> \e,A`\e(B
51 circumflex | ^ | ^a -> \e,Ab\e(B
52 diaeresis | \" | \"a -> \e,Ad\e(B \"\" -> \e,A(\e(B
53 tilde | ~ | ~a -> \e,Ac\e(B
54 cedilla | ~ | ~c -> \e,Ag\e(B
55 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
56 symbol | ~ | ~> -> \e,A;\e(B ~< -> \e,A+\e(B ~! -> \e,A!\e(B ~? -> \e,A?\e(B ~~ -> \e,A8\e(B
57 | ~ | ~s -> \e,A'\e(B ~x -> \e,A$\e(B ~. -> \e,A7\e(B ~$ -> \e,A#\e(B ~u -> \e,A5\e(B
58 | ~ | ~p -> \e,A6\e(B ~- -> \e,A-\e(B ~= -> \e,A/\e(B ~| -> \e,A&\e(B
59 symbol | _ / | _o -> \e,A:\e(B _a -> \e,A*\e(B // -> \e,A0\e(B /\\ -> \e,AW\e(B _y -> \e,A%\e(B
60 | _ / | _: -> \e,Aw\e(B /c -> \e,A"\e(B /2 -> \e,A=\e(B /4 -> \e,A<\e(B /3 -> \e,A>\e(B
61 | _ / | /= => \e,A,\e(B
62 symbol | ^ | ^r -> \e,A.\e(B ^c -> \e,A)\e(B ^1 -> \e,A9\e(B ^2 -> \e,A2\e(B ^3 -> \e,A3\e(B
63 " nil t nil nil nil nil nil nil nil nil t)
64
65 ;; Fixme: should we have non-break space somehow? If so, how?
66 (quail-define-rules
67 ("'A" ?\e,AA\e(B)
68 ("'E" ?\e,AI\e(B)
69 ("'I" ?\e,AM\e(B)
70 ("'O" ?\e,AS\e(B)
71 ("'U" ?\e,AZ\e(B)
72 ("'Y" ?\e,A]\e(B)
73 ("'a" ?\e,Aa\e(B)
74 ("'e" ?\e,Ai\e(B)
75 ("'i" ?\e,Am\e(B)
76 ("'o" ?\e,As\e(B)
77 ("'u" ?\e,Az\e(B)
78 ("'y" ?\e,A}\e(B)
79 ("''" ?\e,A4\e(B)
80 ("' " ?')
81 ("`A" ?\e,A@\e(B)
82 ("`E" ?\e,AH\e(B)
83 ("`I" ?\e,AL\e(B)
84 ("`O" ?\e,AR\e(B)
85 ("`U" ?\e,AY\e(B)
86 ("`a" ?\e,A`\e(B)
87 ("`e" ?\e,Ah\e(B)
88 ("`i" ?\e,Al\e(B)
89 ("`o" ?\e,Ar\e(B)
90 ("`u" ?\e,Ay\e(B)
91 ("``" ?`)
92 ("` " ?`)
93 ("^A" ?\e,AB\e(B)
94 ("^E" ?\e,AJ\e(B)
95 ("^I" ?\e,AN\e(B)
96 ("^O" ?\e,AT\e(B)
97 ("^U" ?\e,A[\e(B)
98 ("^a" ?\e,Ab\e(B)
99 ("^e" ?\e,Aj\e(B)
100 ("^i" ?\e,An\e(B)
101 ("^o" ?\e,At\e(B)
102 ("^u" ?\e,A{\e(B)
103 ("^^" ?^)
104 ("^ " ?^)
105 ("\"A" ?\e,AD\e(B)
106 ("\"E" ?\e,AK\e(B)
107 ("\"I" ?\e,AO\e(B)
108 ("\"O" ?\e,AV\e(B)
109 ("\"U" ?\e,A\\e(B)
110 ("\"a" ?\e,Ad\e(B)
111 ("\"e" ?\e,Ak\e(B)
112 ("\"i" ?\e,Ao\e(B)
113 ("\"o" ?\e,Av\e(B)
114 ("\"s" ?\e,A_\e(B)
115 ("\"u" ?\e,A|\e(B)
116 ("\"y" ?\e,A\7f\e(B)
117 ("\"\"" ?\e,A(\e(B)
118 ("\" " ?\")
119 ("~A" ?\e,AC\e(B)
120 ("~C" ?\e,AG\e(B)
121 ("~D" ?\e,AP\e(B)
122 ("~N" ?\e,AQ\e(B)
123 ("~O" ?\e,AU\e(B)
124 ("~T" ?\e,A^\e(B)
125 ("~a" ?\e,Ac\e(B)
126 ("~c" ?\e,Ag\e(B)
127 ("~d" ?\e,Ap\e(B)
128 ("~n" ?\e,Aq\e(B)
129 ("~o" ?\e,Au\e(B)
130 ("~t" ?\e,A~\e(B)
131 ("~>" ?\\e,A;\e(B)
132 ("~<" ?\\e,A+\e(B)
133 ("~!" ?\e,A!\e(B)
134 ("~?" ?\e,A?\e(B)
135 ("~~" ?\e,A8\e(B)
136 ("~ " ?~)
137 ("/A" ?\e,AE\e(B)
138 ("/E" ?\e,AF\e(B)
139 ("/O" ?\e,AX\e(B)
140 ("/a" ?\e,Ae\e(B)
141 ("/e" ?\e,Af\e(B)
142 ("/o" ?\e,Ax\e(B)
143 ("//" ?\e,A0\e(B)
144 ("/ " ?/)
145 ("_o" ?\e,A:\e(B)
146 ("_a" ?\e,A*\e(B)
147 ;; Symbols added by Roland Smith <rsmith@xs4all.nl>
148 ("_+" ?\e,A1\e(B)
149 ("_y" ?\e,A%\e(B)
150 ("_:" ?\e,Aw\e(B)
151 ("/c" ?\e,A"\e(B)
152 ("/\\" ?\e,AW\e(B)
153 ("/2" ?\e,A=\e(B)
154 ("/4" ?\e,A<\e(B)
155 ("/3" ?\e,A>\e(B)
156 ("~s" ?\e,A'\e(B)
157 ("~p" ?\e,A6\e(B)
158 ("~x" ?\e,A$\e(B)
159 ("~." ?\e,A7\e(B)
160 ("~$" ?\e,A#\e(B)
161 ("~u" ?\e,A5\e(B)
162 ("^r" ?\e,A.\e(B)
163 ("^c" ?\e,A)\e(B)
164 ("^1" ?\e,A9\e(B)
165 ("^2" ?\e,A2\e(B)
166 ("^3" ?\e,A3\e(B)
167 ("~-" ?\e,A-\e(B)
168 ("~|" ?\e,A&\e(B)
169 ("/=" ?\e,A,\e(B)
170 ("~=" ?\e,A/\e(B)
171 )
172
173 (quail-define-package
174 "catalan-prefix" "Latin-1" "CA>" t
175 "Catalan and Spanish input method with prefix modifiers
176
177 effect | prefix | examples
178 ------------+--------+----------
179 acute | ' | 'a -> \e,Aa\e(B '' -> \e,A4\e(B
180 grave | ` | `a -> \e,A`\e(B
181 diaeresis | \" | \"i -> \e,Ao\e(B \"\" -> \e,A(\e(B
182 tilde | ~ | ~n -> \e,Aq\e(B
183 cedilla | ~ | ~c -> \e,Ag\e(B
184 symbol | ~ | ~> -> \e,A;\e(B ~< -> \e,A+\e(B ~! -> \e,A!\e(B ~? -> \e,A?\e(B
185 " nil t nil nil nil nil nil nil nil nil t)
186
187 (quail-define-rules
188 ("'A" ?\e,AA\e(B)
189 ("'E" ?\e,AI\e(B)
190 ("'I" ?\e,AM\e(B)
191 ("'O" ?\e,AS\e(B)
192 ("'U" ?\e,AZ\e(B)
193 ("'a" ?\e,Aa\e(B)
194 ("'e" ?\e,Ai\e(B)
195 ("'i" ?\e,Am\e(B)
196 ("'o" ?\e,As\e(B)
197 ("'u" ?\e,Az\e(B)
198 ("' " ?')
199 ("`A" ?\e,A@\e(B)
200 ("`E" ?\e,AH\e(B)
201 ("`O" ?\e,AR\e(B)
202 ("`a" ?\e,A`\e(B)
203 ("`e" ?\e,Ah\e(B)
204 ("`o" ?\e,Ar\e(B)
205 ("` " ?`)
206 ("\"I" ?\e,AO\e(B)
207 ("\"U" ?\e,A\\e(B)
208 ("\"i" ?\e,Ao\e(B)
209 ("\"u" ?\e,A|\e(B)
210 ("\" " ?\")
211 ("~C" ?\e,AG\e(B)
212 ("~N" ?\e,AQ\e(B)
213 ("~c" ?\e,Ag\e(B)
214 ("~n" ?\e,Aq\e(B)
215 ("~>" ?\\e,A;\e(B)
216 ("~<" ?\\e,A+\e(B)
217 ("~!" ?\e,A!\e(B)
218 ("~?" ?\e,A?\e(B)
219 ("~ " ?~)
220 )
221
222 (quail-define-package
223 "esperanto-prefix" "Latin-3" "EO>" t
224 "Esperanto input method with prefix modifiers
225 Key translation rules are:
226 ^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,
227 ^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
228 " nil t nil nil nil nil nil nil nil nil t)
229
230 (quail-define-rules
231 ("^H" ?\e,C&\e(B)
232 ("^J" ?\e,C,\e(B)
233 ("^h" ?\e,C6\e(B)
234 ("^j" ?\e,C<\e(B)
235 ("^C" ?\e,CF\e(B)
236 ("^G" ?\e,CX\e(B)
237 ("^S" ?\e,C^\e(B)
238 ("^c" ?\e,Cf\e(B)
239 ("^g" ?\e,Cx\e(B)
240 ("^s" ?\e,C~\e(B)
241 ("^^" ?^)
242 ("^ " ?^)
243 ("~U" ?\e,C]\e(B)
244 ("~u" ?\e,C}\e(B)
245 ("~ " ?~)
246 )
247
248 (quail-define-package
249 "french-prefix" "French" "FR>" t
250 "French (Fran\e,Ag\e(Bais) input method with prefix modifiers
251
252 effect | prefix | examples
253 ------------+--------+----------
254 acute | ' | 'e -> \e,Ai\e(B
255 grave | ` | `a -> \e,A`\e(B
256 circumflex | ^ | ^a -> \e,Ab\e(B
257 diaeresis | \" | \"i -> \e,Ao\e(B
258 cedilla | ~ or , | ~c -> \e,Ag\e(B ,c -> \e,Ag\e(B
259 symbol | ~ | ~> -> \e,A;\e(B ~< -> \e,A+\e(B
260 " nil t nil nil nil nil nil nil nil nil t)
261
262 (quail-define-rules
263 ("'E" ?\e,AI\e(B)
264 ("'C" ?\e,AG\e(B)
265 ("'e" ?\e,Ai\e(B)
266 ("'c" ?\e,Ag\e(B)
267 ("' " ?')
268 ("`A" ?\e,A@\e(B)
269 ("`E" ?\e,AH\e(B)
270 ("`U" ?\e,AY\e(B)
271 ("`a" ?\e,A`\e(B)
272 ("`e" ?\e,Ah\e(B)
273 ("`u" ?\e,Ay\e(B)
274 ("` " ?`)
275 ("^A" ?\e,AB\e(B)
276 ("^E" ?\e,AJ\e(B)
277 ("^I" ?\e,AN\e(B)
278 ("^O" ?\e,AT\e(B)
279 ("^U" ?\e,A[\e(B)
280 ("^a" ?\e,Ab\e(B)
281 ("^e" ?\e,Aj\e(B)
282 ("^i" ?\e,An\e(B)
283 ("^o" ?\e,At\e(B)
284 ("^u" ?\e,A{\e(B)
285 ("^ " ?^)
286 ("\"E" ?\e,AK\e(B)
287 ("\"I" ?\e,AO\e(B)
288 ("\"e" ?\e,Ak\e(B)
289 ("\"i" ?\e,Ao\e(B)
290 ("\" " ?\")
291 ("~<" ?\\e,A+\e(B)
292 ("~>" ?\\e,A;\e(B)
293 ("~C" ?\e,AG\e(B)
294 ("~c" ?\e,Ag\e(B)
295 ("~," ?,)
296 (",C" ?\e,AG\e(B)
297 (",c" ?\e,Ag\e(B)
298 (", " ?~)
299 )
300
301 (quail-define-package
302 "romanian-prefix" "Romanian" "RO>" t
303 "Romanian (rom\e,Bb\e(Bne\e,B:\e(Bte) input method with prefix modifiers
304
305 effect | prefix | examples
306 ------------+--------+------------------
307 tilde | ~ | ~a -> \e,Bc\e(B
308 circumflex | ^ | ^a -> \e,Bb\e(B, ^i -> \e,Bn\e(B
309 cedilla | , | ,s -> \e,B:\e(B, ,t -> \e,B~\e(B
310 ~ | ~ | ~~ -> ~
311 ^ | ^ | ^^ -> ^
312 , | , | ,, -> ,
313 " nil t nil nil nil nil nil nil nil nil t)
314
315 (quail-define-rules
316 ("~A" ?\e,BC\e(B) ("~a" ?\e,Bc\e(B)
317 ("^A" ?\e,BB\e(B) ("^a" ?\e,Bb\e(B)
318 ("^I" ?\e,BN\e(B) ("^i" ?\e,Bn\e(B)
319 (",S" ?\e,B*\e(B) (",s" ?\e,B:\e(B)
320 (",T" ?\e,B^\e(B) (",t" ?\e,B~\e(B)
321 ("^^" ?^) ("~~" ?~) (",," ?,))
322
323 (quail-define-package
324 "romanian-alt-prefix" "Romanian" "RO>" t
325 "Alternative Romanian (rom\e,Bb\e(Bne\e,B:\e(Bte) input method with prefix modifiers
326
327 effect | prefix | examples
328 ------------+--------+------------------
329 tilde | \" | \"a -> \e,Bb\e(B
330 circumflex | ' | 'a -> \e,Bb\e(B, 'i -> \e,Bn\e(B
331 cedilla | ' | 's -> \e,B:\e(B, 't -> \e,B~\e(B
332 ' | ' | '' -> '
333 \" | \" | \"\" -> \"
334 " nil t nil nil nil nil nil nil nil nil t)
335
336 (quail-define-rules
337 ("'A" ?\e,BC\e(B) ("'a" ?\e,Bc\e(B)
338 ("\"A" ?\e,BB\e(B) ("\"a" ?\e,Bb\e(B)
339 ("'I" ?\e,BN\e(B) ("'i" ?\e,Bn\e(B)
340 ("'S" ?\e,B*\e(B) ("'s" ?\e,B:\e(B)
341 ("'T" ?\e,B^\e(B) ("'t" ?\e,B~\e(B)
342 ("''" ?') ("\"\"" ?\"))
343
344 (quail-define-package
345 "german-prefix" "German" "DE>" t
346 "German (Deutsch) input method with prefix modifiers
347 Key translation rules are:
348 \"A -> \e,AD\e(B -> \"O -> \e,AV\e(B \"U -> \e,A\\e(B \"s -> ?\e,A_\e(B
349 " nil t nil nil nil nil nil nil nil nil t)
350
351 (quail-define-rules
352 ("\"A" ?\e,AD\e(B)
353 ("\"O" ?\e,AV\e(B)
354 ("\"U" ?\e,A\\e(B)
355 ("\"a" ?\e,Ad\e(B)
356 ("\"o" ?\e,Av\e(B)
357 ("\"u" ?\e,A|\e(B)
358 ("\"s" ?\e,A_\e(B)
359 ("\" " ?\")
360 )
361
362 (quail-define-package
363 "irish-prefix" "Latin-1" "GA>" t
364 "Irish input method with prefix modifiers
365 Key translation rules are:
366 '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
367 " nil t nil nil nil nil nil nil nil nil t)
368
369 (quail-define-rules
370 ("'A" ?\e,AA\e(B)
371 ("'E" ?\e,AI\e(B)
372 ("'I" ?\e,AM\e(B)
373 ("'O" ?\e,AS\e(B)
374 ("'U" ?\e,AZ\e(B)
375 ("'a" ?\e,Aa\e(B)
376 ("'e" ?\e,Ai\e(B)
377 ("'i" ?\e,Am\e(B)
378 ("'o" ?\e,As\e(B)
379 ("'u" ?\e,Az\e(B)
380 ("' " ?')
381 )
382
383 (quail-define-package
384 "portuguese-prefix" "Latin-1" "PT>" t
385 "Portuguese input method with prefix modifiers
386
387 effect | prefix | examples
388 ------------+--------+----------
389 acute | ' | 'a -> \e,Aa\e(B '' -> \e,A4\e(B
390 grave | ` | `a -> \e,A`\e(B
391 circumflex | ^ | ^a -> \e,Ab\e(B
392 diaeresis | \" | \"u -> \e,A|\e(B
393 tilde | ~ | ~a -> \e,Ac\e(B
394 cedilla | ' or , | 'c -> \e,Ag\e(B ,c -> \e,Ag\e(B
395 " nil t nil nil nil nil nil nil nil nil t)
396
397 (quail-define-rules
398 ("'A" ?\e,AA\e(B)
399 ("'E" ?\e,AI\e(B)
400 ("'I" ?\e,AM\e(B)
401 ("'O" ?\e,AS\e(B)
402 ("'U" ?\e,AZ\e(B)
403 ("'C" ?\e,AG\e(B)
404 ("'a" ?\e,Aa\e(B)
405 ("'e" ?\e,Ai\e(B)
406 ("'i" ?\e,Am\e(B)
407 ("'o" ?\e,As\e(B)
408 ("'u" ?\e,Az\e(B)
409 ("'c" ?\e,Ag\e(B)
410 ("' " ?')
411 ("`A" ?\e,A@\e(B)
412 ("`a" ?\e,A`\e(B)
413 ("` " ?`)
414 ("^A" ?\e,AB\e(B)
415 ("^E" ?\e,AJ\e(B)
416 ("^O" ?\e,AT\e(B)
417 ("^a" ?\e,Ab\e(B)
418 ("^e" ?\e,Aj\e(B)
419 ("^o" ?\e,At\e(B)
420 ("^ " ?^)
421 ("\"U" ?\e,A\\e(B)
422 ("\"u" ?\e,A|\e(B)
423 ("\" " ?\")
424 ("~A" ?\e,AC\e(B)
425 ("~O" ?\e,AU\e(B)
426 ("~a" ?\e,Ac\e(B)
427 ("~o" ?\e,Au\e(B)
428 ("~ " ?~)
429 (",c" ?\e,Ag\e(B)
430 (",C" ?\e,AG\e(B)
431 (",," ?,)
432 )
433
434 (quail-define-package
435 "spanish-prefix" "Spanish" "ES>" t
436 "Spanish (Espa\e,Aq\e(Bol) input method with prefix modifiers
437
438 effect | prefix | examples
439 ------------+--------+----------
440 acute | ' | 'a -> \e,Aa\e(B
441 diaeresis | \" | \"u -> \e,A|\e(B
442 tilde | ~ | ~n -> \e,Aq\e(B
443 symbol | ~ | ~> -> \e,A;\e(B ~< -> \e,A+\e(B ~! -> \e,A!\e(B ~? -> \e,A?\e(B
444 " nil t nil nil nil nil nil nil nil nil t)
445
446 (quail-define-rules
447 ("'A" ?\e,AA\e(B)
448 ("'E" ?\e,AI\e(B)
449 ("'I" ?\e,AM\e(B)
450 ("'O" ?\e,AS\e(B)
451 ("'U" ?\e,AZ\e(B)
452 ("'a" ?\e,Aa\e(B)
453 ("'e" ?\e,Ai\e(B)
454 ("'i" ?\e,Am\e(B)
455 ("'o" ?\e,As\e(B)
456 ("'u" ?\e,Az\e(B)
457 ("' " ?')
458 ("\"U" ?\e,A\\e(B)
459 ("\"u" ?\e,A|\e(B)
460 ("\" " ?\")
461 ("~N" ?\e,AQ\e(B)
462 ("~n" ?\e,Aq\e(B)
463 ("~>" ?\\e,A;\e(B)
464 ("~<" ?\\e,A+\e(B)
465 ("~!" ?\e,A!\e(B)
466 ("~?" ?\e,A?\e(B)
467 ("~ " ?~)
468 )
469
470 (quail-define-package
471 "latin-2-prefix" "Latin-2" "2>" t
472 "Latin-2 characters input method with prefix modifiers
473
474 effect | prefix | examples
475 ------------+--------+----------
476 acute | ' | 'a -> \e,Ba\e(B '' -> ?\e,B4\e(B
477 circumflex | ^ | ^a -> \e,Bb\e(B
478 diaeresis | \" | \"a -> \e,Bd\e(B \"\" -> \e,B(\e(B
479 breve | ~ | ~a -> \e,Bc\e(B
480 caron | ~ | ~c -> \e,Bh\e(B
481 cedilla | ` | `c -> \e,Bg\e(B `e -> ?\e,Bj\e(B
482 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
483 symbol | ~ | `. -> \e,B\7f\e(B ~~ -> \e,B"\e(B ~. -> ?\e,B8\e(B
484 " nil t nil nil nil nil nil nil nil nil t)
485
486 (quail-define-rules
487 ("'A" ?\e,BA\e(B)
488 ("'C" ?\e,BF\e(B)
489 ("'D" ?\e,BP\e(B)
490 ("'E" ?\e,BI\e(B)
491 ("'I" ?\e,BM\e(B)
492 ("'L" ?\e,BE\e(B)
493 ("'N" ?\e,BQ\e(B)
494 ("'O" ?\e,BS\e(B)
495 ("'R" ?\e,B@\e(B)
496 ("'S" ?\e,B&\e(B)
497 ("'U" ?\e,BZ\e(B)
498 ("'Y" ?\e,B]\e(B)
499 ("'Z" ?\e,B,\e(B)
500 ("'a" ?\e,Ba\e(B)
501 ("'c" ?\e,Bf\e(B)
502 ("'d" ?\e,Bp\e(B)
503 ("'e" ?\e,Bi\e(B)
504 ("'i" ?\e,Bm\e(B)
505 ("'l" ?\e,Be\e(B)
506 ("'n" ?\e,Bq\e(B)
507 ("'o" ?\e,Bs\e(B)
508 ("'r" ?\e,B`\e(B)
509 ("'s" ?\e,B6\e(B)
510 ("'u" ?\e,Bz\e(B)
511 ("'y" ?\e,B}\e(B)
512 ("'z" ?\e,B<\e(B)
513 ("''" ?\e,B4\e(B)
514 ("' " ?')
515 ("`A" ?\e,B!\e(B)
516 ("`C" ?\e,BG\e(B)
517 ("`E" ?\e,BJ\e(B)
518 ("`L" ?\e,B#\e(B)
519 ("`S" ?\e,B*\e(B)
520 ("`T" ?\e,B^\e(B)
521 ("`Z" ?\e,B/\e(B)
522 ("`a" ?\e,B1\e(B)
523 ("`l" ?\e,B3\e(B)
524 ("`c" ?\e,Bg\e(B)
525 ("`e" ?\e,Bj\e(B)
526 ("`s" ?\e,B:\e(B)
527 ("`t" ?\e,B~\e(B)
528 ("`z" ?\e,B?\e(B)
529 ("``" ?\e,B*\e(B)
530 ("`." ?\e,B\7f\e(B)
531 ("` " ?`)
532 ("^A" ?\e,BB\e(B)
533 ("^I" ?\e,BN\e(B)
534 ("^O" ?\e,BT\e(B)
535 ("^a" ?\e,Bb\e(B)
536 ("^i" ?\e,Bn\e(B)
537 ("^o" ?\e,Bt\e(B)
538 ("^^" ?^)
539 ("^ " ?^)
540 ("\"A" ?\e,BD\e(B)
541 ("\"E" ?\e,BK\e(B)
542 ("\"O" ?\e,BV\e(B)
543 ("\"U" ?\e,B\\e(B)
544 ("\"a" ?\e,Bd\e(B)
545 ("\"e" ?\e,Bk\e(B)
546 ("\"o" ?\e,Bv\e(B)
547 ("\"s" ?\e,B_\e(B)
548 ("\"u" ?\e,B|\e(B)
549 ("\"\"" ?\e,B(\e(B)
550 ("\" " ?\")
551 ("~A" ?\e,BC\e(B)
552 ("~C" ?\e,BH\e(B)
553 ("~D" ?\e,BO\e(B)
554 ("~L" ?\e,B%\e(B)
555 ("~N" ?\e,BR\e(B)
556 ("~O" ?\e,BU\e(B)
557 ("~R" ?\e,BX\e(B)
558 ("~S" ?\e,B)\e(B)
559 ("~T" ?\e,B+\e(B)
560 ("~U" ?\e,B[\e(B)
561 ("~Z" ?\e,B.\e(B)
562 ("~a" ?\e,Bc\e(B)
563 ("~c" ?\e,Bh\e(B)
564 ("~d" ?\e,Bo\e(B)
565 ("~l" ?\e,B5\e(B)
566 ("~n" ?\e,Br\e(B)
567 ("~o" ?\e,Bu\e(B)
568 ("~r" ?\e,Bx\e(B)
569 ("~s" ?\e,B9\e(B)
570 ("~t" ?\e,B;\e(B)
571 ("~u" ?\e,B{\e(B)
572 ("~z" ?\e,B>\e(B)
573 ("~v" ?\e,B"\e(B)
574 ("~~" ?\e,B"\e(B)
575 ("~." ?\e,B8\e(B)
576 ("~ " ?~)
577 )
578
579 (quail-define-package
580 "latin-3-prefix" "Latin-3" "3>" t
581 "Latin-3 characters input method with prefix modifiers
582
583 effect | prefix | examples
584 ------------+--------+----------
585 acute | ' | 'a -> \e,Ca\e(B '' -> ?\e,C4\e(B
586 grave | ` | `a -> \e,C`\e(B
587 circumflex | ^ | ^a -> \e,Cb\e(B
588 diaeresis | \" | \"a -> \e,Cd\e(B \"\" -> \e,C(\e(B
589 cedilla | ~ | ~c -> \e,Cg\e(B ~s -> \e,C:\e(B ~~ -> \e,C8\e(B
590 dot above | ~ / . | ~o -> \e,Cu\e(B /o -> \e,Cu\e(B .o -> \e,Cu\e(B
591 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
592 symbol | ~ | ~` -> \e,C"\e(B /# -> \e,C#\e(B /$ -> \e,C$\e(B // -> \e,C0\e(B
593 " nil t nil nil nil nil nil nil nil nil t)
594
595 (quail-define-rules
596 ("'A" ?\e,CA\e(B)
597 ("'E" ?\e,CI\e(B)
598 ("'I" ?\e,CM\e(B)
599 ("'O" ?\e,CS\e(B)
600 ("'U" ?\e,CZ\e(B)
601 ("'a" ?\e,Ca\e(B)
602 ("'e" ?\e,Ci\e(B)
603 ("'i" ?\e,Cm\e(B)
604 ("'o" ?\e,Cs\e(B)
605 ("'u" ?\e,Cz\e(B)
606 ("''" ?\e,C4\e(B)
607 ("' " ?')
608 ("`A" ?\e,C@\e(B)
609 ("`E" ?\e,CH\e(B)
610 ("`I" ?\e,CL\e(B)
611 ("`O" ?\e,CR\e(B)
612 ("`U" ?\e,CY\e(B)
613 ("`a" ?\e,C`\e(B)
614 ("`e" ?\e,Ch\e(B)
615 ("`i" ?\e,Cl\e(B)
616 ("`o" ?\e,Cr\e(B)
617 ("`u" ?\e,Cy\e(B)
618 ("``" ?`)
619 ("` " ?`)
620 ("^A" ?\e,CB\e(B)
621 ("^C" ?\e,CF\e(B)
622 ("^E" ?\e,CJ\e(B)
623 ("^G" ?\e,CX\e(B)
624 ("^H" ?\e,C&\e(B)
625 ("^I" ?\e,CN\e(B)
626 ("^J" ?\e,C,\e(B)
627 ("^O" ?\e,CT\e(B)
628 ("^S" ?\e,C^\e(B)
629 ("^U" ?\e,C[\e(B)
630 ("^a" ?\e,Cb\e(B)
631 ("^c" ?\e,Cf\e(B)
632 ("^e" ?\e,Cj\e(B)
633 ("^g" ?\e,Cx\e(B)
634 ("^h" ?\e,C6\e(B)
635 ("^i" ?\e,Cn\e(B)
636 ("^j" ?\e,C<\e(B)
637 ("^o" ?\e,Ct\e(B)
638 ("^s" ?\e,C~\e(B)
639 ("^u" ?\e,C{\e(B)
640 ("^^" ?^)
641 ("^ " ?^)
642 ("\"A" ?\e,CD\e(B)
643 ("\"E" ?\e,CK\e(B)
644 ("\"I" ?\e,CO\e(B)
645 ("\"O" ?\e,CV\e(B)
646 ("\"U" ?\e,C\\e(B)
647 ("\"a" ?\e,Cd\e(B)
648 ("\"e" ?\e,Ck\e(B)
649 ("\"i" ?\e,Co\e(B)
650 ("\"o" ?\e,Cv\e(B)
651 ("\"u" ?\e,C|\e(B)
652 ("\"s" ?\e,C_\e(B)
653 ("\"\"" ?\e,C(\e(B)
654 ("\" " ?\")
655 ("~A" ?\e,CC\e(B)
656 ("~C" ?\e,CG\e(B)
657 ("~D" ?\e,CP\e(B)
658 ("~N" ?\e,CQ\e(B)
659 ("~O" ?\e,CU\e(B)
660 ("~a" ?\e,Cc\e(B)
661 ("~c" ?\e,Cg\e(B)
662 ("~d" ?\e,Cp\e(B)
663 ("~n" ?\e,Cq\e(B)
664 ("~o" ?\e,Cu\e(B)
665 ("~$" ?\e,C%\e(B)
666 ("~S" ?\e,C*\e(B)
667 ("~s" ?\e,C:\e(B)
668 ("~G" ?\e,C+\e(B)
669 ("~g" ?\e,C;\e(B)
670 ("~U" ?\e,C]\e(B)
671 ("~u" ?\e,C}\e(B)
672 ("~`" ?\e,C"\e(B)
673 ("~~" ?\e,C8\e(B)
674 ("~ " ?~)
675 ("/C" ?\e,CE\e(B)
676 ("/G" ?\e,CU\e(B)
677 ("/H" ?\e,C!\e(B)
678 ("/I" ?\e,C)\e(B)
679 ("/Z" ?\e,C/\e(B)
680 ("/c" ?\e,Ce\e(B)
681 ("/g" ?\e,Cu\e(B)
682 ("/h" ?\e,C1\e(B)
683 ("/i" ?\e,C9\e(B)
684 ("/z" ?\e,C?\e(B)
685 ("/r" ?\e,C.\e(B)
686 ("/." ?\e,C\7f\e(B)
687 ("/#" ?\e,C#\e(B)
688 ("/$" ?\e,C$\e(B)
689 ("//" ?\e,C0\e(B)
690 ("/ " ?/)
691 (".C" ?\e,CE\e(B)
692 (".G" ?\e,CU\e(B)
693 (".I" ?\e,C)\e(B)
694 (".Z" ?\e,C/\e(B)
695 (".c" ?\e,Ce\e(B)
696 (".g" ?\e,Cu\e(B)
697 (".z" ?\e,C?\e(B)
698 )
699
700
701 (quail-define-package
702 "polish-slash" "Polish" "PL>" nil
703 "Polish diacritics in Latin-2 encoding are input as `/[acelnosxzACELNOSXZ]'.
704 For example, the character named `aogonek' is obtained by `/a'."
705 nil t t t nil nil nil nil nil nil t)
706
707 (quail-define-rules
708 ("/a" ?\e,B1\e(B)
709 ("/c" ?\e,Bf\e(B)
710 ("/e" ?\e,Bj\e(B)
711 ("/l" ?\e,B3\e(B)
712 ("/n" ?\e,Bq\e(B)
713 ("/o" ?\e,Bs\e(B)
714 ("/s" ?\e,B6\e(B)
715 ("/x" ?\e,B<\e(B)
716 ("/z" ?\e,B?\e(B)
717 ("/A" ?\e,B!\e(B)
718 ("/C" ?\e,BF\e(B)
719 ("/E" ?\e,BJ\e(B)
720 ("/L" ?\e,B#\e(B)
721 ("/N" ?\e,BQ\e(B)
722 ("/O" ?\e,BS\e(B)
723 ("/S" ?\e,B&\e(B)
724 ("/X" ?\e,B,\e(B)
725 ("/Z" ?\e,B/\e(B))
726
727 (quail-define-package
728 "latin-9-prefix" "Latin-9" "0>" t
729 "Latin-9 characters input method with prefix modifiers
730
731 effect | prefix | examples
732 ------------+--------+----------
733 acute | ' | 'a -> \e,ba\e(B
734 grave | ` | `a -> \e,b`\e(B
735 circumflex | ^ | ^a -> \e,bb\e(B
736 diaeresis | \" | \"a -> \e,bd\e(B, \"Y -> \e,b>\e(B
737 tilde | ~ | ~a -> \e,bc\e(B
738 caron | ~ | ~z -> \e,b8\e(B
739 cedilla | ~ | ~c -> \e,bg\e(B
740 misc | \" ~ / | \"s -> \e,b_\e(B ~d -> \e,bp\e(B ~t -> \e,b~\e(B /a -> \e,be\e(B /e -> \e,bf\e(B /o -> \e,bx\e(B
741 | \" ~ / | /o -> \e,b=\e(B
742 symbol | ~ | ~> -> \e,b;\e(B ~< -> \e,b+\e(B ~! -> \e,b!\e(B ~? -> \e,b?\e(B ~~ -> \e,b8\e(B
743 | ~ | ~s -> \e,b'\e(B ~e -> \e,b$\e(B ~. -> \e,b7\e(B ~$ -> \e,b#\e(B ~u -> \e,b5\e(B
744 | ~ | ~- -> \e,b-\e(B ~= -> \e,b/\e(B
745 symbol | _ / | _o -> \e,b:\e(B _a -> \e,b*\e(B // -> \e,b0\e(B /\\ -> \e,bW\e(B _y -> \e,b%\e(B
746 | _ / | _: -> \e,bw\e(B /c -> \e,b"\e(B ~p -> \e,b6\e(B
747 | _ / | /= -> \e,b,\e(B
748 symbol | ^ | ^r -> \e,b.\e(B ^c -> \e,b)\e(B ^1 -> \e,b9\e(B ^2 -> \e,b2\e(B ^3 -> \e,b3\e(B _a -> \e,b*\e(B
749 " nil t nil nil nil nil nil nil nil nil t)
750
751 (quail-define-rules
752 ("'A" ?\e,bA\e(B)
753 ("'E" ?\e,bI\e(B)
754 ("'I" ?\e,bM\e(B)
755 ("'O" ?\e,bS\e(B)
756 ("'U" ?\e,bZ\e(B)
757 ("'Y" ?\e,b]\e(B)
758 ("'a" ?\e,ba\e(B)
759 ("'e" ?\e,bi\e(B)
760 ("'i" ?\e,bm\e(B)
761 ("'o" ?\e,bs\e(B)
762 ("'u" ?\e,bz\e(B)
763 ("'y" ?\e,b}\e(B)
764 ("' " ?')
765 ("`A" ?\e,b@\e(B)
766 ("`E" ?\e,bH\e(B)
767 ("`I" ?\e,bL\e(B)
768 ("`O" ?\e,bR\e(B)
769 ("`U" ?\e,bY\e(B)
770 ("`a" ?\e,b`\e(B)
771 ("`e" ?\e,bh\e(B)
772 ("`i" ?\e,bl\e(B)
773 ("`o" ?\e,br\e(B)
774 ("`u" ?\e,by\e(B)
775 ("``" ?`)
776 ("` " ?`)
777 ("^A" ?\e,bB\e(B)
778 ("^E" ?\e,bJ\e(B)
779 ("^I" ?\e,bN\e(B)
780 ("^O" ?\e,bT\e(B)
781 ("^U" ?\e,b[\e(B)
782 ("^a" ?\e,bb\e(B)
783 ("^e" ?\e,bj\e(B)
784 ("^i" ?\e,bn\e(B)
785 ("^o" ?\e,bt\e(B)
786 ("^u" ?\e,b{\e(B)
787 ("^^" ?^)
788 ("^ " ?^)
789 ("\"A" ?\e,bD\e(B)
790 ("\"E" ?\e,bK\e(B)
791 ("\"I" ?\e,bO\e(B)
792 ("\"O" ?\e,bV\e(B)
793 ("\"U" ?\e,b\\e(B)
794 ("\"a" ?\e,bd\e(B)
795 ("\"e" ?\e,bk\e(B)
796 ("\"i" ?\e,bo\e(B)
797 ("\"o" ?\e,bv\e(B)
798 ("\"s" ?\e,b_\e(B)
799 ("\"u" ?\e,b|\e(B)
800 ("\"y" ?\e,b\7f\e(B)
801 ("\" " ?\")
802 ("~A" ?\e,bC\e(B)
803 ("~C" ?\e,bG\e(B)
804 ("~D" ?\e,bP\e(B)
805 ("~N" ?\e,bQ\e(B)
806 ("~O" ?\e,bU\e(B)
807 ("~S" ?\e,b&\e(B)
808 ("~T" ?\e,b^\e(B)
809 ("~Z" ?\e,b4\e(B)
810 ("~a" ?\e,bc\e(B)
811 ("~c" ?\e,bg\e(B)
812 ("~d" ?\e,bp\e(B)
813 ("~n" ?\e,bq\e(B)
814 ("~o" ?\e,bu\e(B)
815 ("~s" ?\e,b(\e(B)
816 ("~t" ?\e,b~\e(B)
817 ("~z" ?\e,b8\e(B)
818 ("~>" ?\\e,b;\e(B)
819 ("~<" ?\\e,b+\e(B)
820 ("~!" ?\e,b!\e(B)
821 ("~?" ?\e,b?\e(B)
822 ("~ " ?~)
823 ("/A" ?\e,bE\e(B)
824 ("/E" ?\e,bF\e(B)
825 ("/O" ?\e,bX\e(B)
826 ("/a" ?\e,be\e(B)
827 ("/e" ?\e,bf\e(B)
828 ("/o" ?\e,bx\e(B)
829 ("//" ?\e,b0\e(B)
830 ("/ " ?/)
831 ("_o" ?\e,b:\e(B)
832 ("_a" ?\e,b*\e(B)
833 ("_+" ?\e,b1\e(B)
834 ("_y" ?\e,b%\e(B)
835 ("_:" ?\e,bw\e(B)
836 ("/c" ?\e,b"\e(B)
837 ("/\\" ?\e,bW\e(B)
838 ("/o" ?\e,b=\e(B) ; clash with \e,bx\e(B, but \e,bf\e(B uses /
839 ("/O" ?\e,b<\e(B)
840 ("\"Y" ?\e,b>\e(B)
841 ("~s" ?\e,b'\e(B)
842 ("~p" ?\e,b6\e(B)
843 ;; Is this the best option for Euro entry?
844 ("~e" ?\e,b$\e(B)
845 ("~." ?\e,b7\e(B)
846 ("~$" ?\e,b#\e(B)
847 ("~u" ?\e,b5\e(B)
848 ("^r" ?\e,b.\e(B)
849 ("^c" ?\e,b)\e(B)
850 ("^1" ?\e,b9\e(B)
851 ("^2" ?\e,b2\e(B)
852 ("^3" ?\e,b3\e(B)
853 ("~-" ?\e,b-\e(B)
854 ("~=" ?\e,b/\e(B)
855 ("/=" ?\e,b,\e(B))
856
857 ;; Latin-8 was done by an Englishman -- Johnny Celt should take a
858 ;; squint at it.
859
860 (quail-define-package
861 "latin-8-prefix" "Latin-8" "8>" t
862 "Latin-8 characters input method with prefix modifiers
863
864 effect | prefix | examples
865 ------------+--------+----------
866 acute | ' | 'a -> \e,_a\e(B
867 grave | ` | `a -> \e,_`\e(B
868 circumflex | ^ | ^w -> \e,_p\e(B
869 diaeresis | \" | \"a -> \e,_d\e(B
870 dot above | . | .b -> \e,_"\e(B
871 tilde | ~ | ~a -> \e,_c\e(B
872 cedilla | ~ | ~c -> \e,_g\e(B
873 misc | \" ~ / | \"s -> \e,__\e(B /a -> \e,_e\e(B /e -> \e,_f\e(B /o -> \e,_x\e(B
874 | ~ | ~s -> \e,_'\e(B ~$ -> \e,_#\e(B ~p -> \e,_6\e(B
875 symbol | ^ | ^r -> \e,_.\e(B ^c -> \e,_)\e(B
876 " nil t nil nil nil nil nil nil nil nil t)
877
878 ;; Basically following Latin-1 plus dottiness from Latin-3.
879 (quail-define-rules
880 (".B" ?\e,_!\e(B)
881 (".b" ?\e,_"\e(B)
882 (".c" ?\e,_%\e(B)
883 (".C" ?\e,_$\e(B)
884 (".D" ?\e,_&\e(B)
885 (".d" ?\e,_+\e(B)
886 (".f" ?\e,_1\e(B)
887 (".F" ?\e,_0\e(B)
888 (".g" ?\e,_3\e(B)
889 (".G" ?\e,_2\e(B)
890 (".m" ?\e,_5\e(B)
891 (".M" ?\e,_4\e(B)
892 (".p" ?\e,_9\e(B)
893 (".P" ?\e,_7\e(B)
894 (".s" ?\e,_?\e(B)
895 (".S" ?\e,_;\e(B)
896 (".t" ?\e,_w\e(B)
897 (".T" ?\e,_W\e(B)
898 ("'A" ?\e,_A\e(B)
899 ("'E" ?\e,_I\e(B)
900 ("'I" ?\e,_M\e(B)
901 ("'O" ?\e,_S\e(B)
902 ("'U" ?\e,_Z\e(B)
903 ("'Y" ?\e,_]\e(B)
904 ("'W" ?\e,_*\e(B)
905 ("'a" ?\e,_a\e(B)
906 ("'e" ?\e,_i\e(B)
907 ("'i" ?\e,_m\e(B)
908 ("'o" ?\e,_s\e(B)
909 ("'u" ?\e,_z\e(B)
910 ("'w" ?\e,_:\e(B)
911 ("'y" ?\e,_}\e(B)
912 ("' " ?')
913 ("`A" ?\e,_@\e(B)
914 ("`E" ?\e,_H\e(B)
915 ("`I" ?\e,_L\e(B)
916 ("`O" ?\e,_R\e(B)
917 ("`U" ?\e,_Y\e(B)
918 ("`W" ?\e,_(\e(B)
919 ("`Y" ?\e,_,\e(B)
920 ("`a" ?\e,_`\e(B)
921 ("`e" ?\e,_h\e(B)
922 ("`i" ?\e,_l\e(B)
923 ("`o" ?\e,_r\e(B)
924 ("`u" ?\e,_y\e(B)
925 ("`w" ?\e,_8\e(B)
926 ("`y" ?\e,_<\e(B)
927 ("``" ?`)
928 ("` " ?`)
929 ("^A" ?\e,_B\e(B)
930 ("^E" ?\e,_J\e(B)
931 ("^I" ?\e,_N\e(B)
932 ("^O" ?\e,_T\e(B)
933 ("^U" ?\e,_[\e(B)
934 ("^a" ?\e,_b\e(B)
935 ("^e" ?\e,_j\e(B)
936 ("^i" ?\e,_n\e(B)
937 ("^o" ?\e,_t\e(B)
938 ("^u" ?\e,_{\e(B)
939 ("^w" ?\e,_p\e(B)
940 ("^W" ?\e,_P\e(B)
941 ("^y" ?\e,_~\e(B)
942 ("^Y" ?\e,_^\e(B)
943 ("^^" ?^)
944 ("^ " ?^)
945 ("\"A" ?\e,_D\e(B)
946 ("\"E" ?\e,_K\e(B)
947 ("\"I" ?\e,_O\e(B)
948 ("\"O" ?\e,_V\e(B)
949 ("\"U" ?\e,_\\e(B)
950 ("\"a" ?\e,_d\e(B)
951 ("\"e" ?\e,_k\e(B)
952 ("\"i" ?\e,_o\e(B)
953 ("\"o" ?\e,_v\e(B)
954 ("\"s" ?\e,__\e(B)
955 ("\"u" ?\e,_|\e(B)
956 ("\"w" ?\e,_>\e(B)
957 ("\"W" ?\e,_=\e(B)
958 ("\"y" ?\e,_\7f\e(B)
959 ("\"Y" ?\e,_/\e(B)
960 ("\" " ?\")
961 ("~A" ?\e,_C\e(B)
962 ("~C" ?\e,_G\e(B)
963 ("~N" ?\e,_Q\e(B)
964 ("~O" ?\e,_U\e(B)
965 ("~a" ?\e,_c\e(B)
966 ("~c" ?\e,_g\e(B)
967 ("~n" ?\e,_q\e(B)
968 ("~o" ?\e,_u\e(B)
969 ("~ " ?~)
970 ("/A" ?\e,_E\e(B)
971 ("/E" ?\e,_F\e(B)
972 ("/O" ?\e,_X\e(B)
973 ("/a" ?\e,_e\e(B)
974 ("/e" ?\e,_f\e(B)
975 ("/o" ?\e,_x\e(B)
976 ("/ " ?/)
977 ("~p" ?\e,_6\e(B)
978 ("~s" ?\e,_'\e(B)
979 ("~$" ?\e,_#\e(B)
980 ("^r" ?\e,_.\e(B)
981 ("^c" ?\e,_)\e(B))
982
983 ;;; latin-pre.el ends here
Unnamed repository; edit this file 'description' to name the repository.