Mercurial > emacs
annotate leim/quail/latin-pre.el @ 94176:4a907fffb2c3
*** empty log message ***
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Fri, 18 Apr 2008 15:48:57 +0000 |
parents | 606f2d163a64 |
children | 4f1fd208c354 |
rev | line source |
---|---|
88786 | 1 ;;; latin-pre.el --- Quail packages for inputting various European characters -*-coding: utf-8;-*- |
18673 | 2 |
75253
f5f322eb227f
Update copyright for years from Emacs 21 to present.
Glenn Morris <rgm@gnu.org>
parents:
74605
diff
changeset
|
3 ;; Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, |
79727 | 4 ;; 2006, 2007, 2008 |
67657 | 5 ;; Free Software Foundation, Inc. |
75253
f5f322eb227f
Update copyright for years from Emacs 21 to present.
Glenn Morris <rgm@gnu.org>
parents:
74605
diff
changeset
|
6 ;; Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, |
79727 | 7 ;; 2006, 2007, 2008 |
67657 | 8 ;; National Institute of Advanced Industrial Science and Technology (AIST) |
9 ;; Registration Number H14PRO021 | |
18673 | 10 |
11 ;; Keywords: mule, multilingual, latin, input method | |
12 | |
13 ;; This file is part of GNU Emacs. | |
14 | |
15 ;; GNU Emacs is free software; you can redistribute it and/or modify | |
16 ;; 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
|
17 ;; the Free Software Foundation; either version 3, or (at your option) |
18673 | 18 ;; any later version. |
19 | |
20 ;; GNU Emacs is distributed in the hope that it will be useful, | |
21 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
22 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
23 ;; GNU General Public License for more details. | |
24 | |
25 ;; You should have received a copy of the GNU General Public License | |
26 ;; along with GNU Emacs; see the file COPYING. If not, write to the | |
64083 | 27 ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
28 ;; Boston, MA 02110-1301, USA. | |
18673 | 29 |
30 ;;; Commentary: | |
31 | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
32 ;; Key translation maps were originally copied from iso-acc.el. |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
33 ;; latin-1-prefix: extra special characters added, adapted from the vim |
27940
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
34 ;; digraphs (from J.H.M.Dassen <jdassen@wi.leidenuniv.nl>) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
35 ;; by R.F. Smith <rsmith@xs4all.nl> |
28434
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
36 ;; |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
37 ;; polish-slash: |
88786 | 38 ;; Author: Włodek Bzyl <matwb@univ.gda.pl> |
39 ;; Maintainer: Włodek Bzyl <matwb@univ.gda.pl> | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
40 ;; |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
41 ;; latin-[89]-prefix: Dave Love <fx@gnu.org> |
18673 | 42 |
46664 | 43 ;; You might make extra input sequences on the basis of the X |
44 ;; locale/*/Compose files (which have both prefix and postfix | |
45 ;; sequences), but bear in mind that sequences which are logical in | |
46 ;; that context may not be sensible when they're not signalled with | |
47 ;; the Compose key. An example is a double space for NBSP. | |
48 | |
18673 | 49 ;;; Code: |
50 | |
51 (require 'quail) | |
52 | |
53 (quail-define-package | |
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
54 "latin-1-prefix" "Latin-1" "1>" t |
18673 | 55 "Latin-1 characters input method with prefix modifiers |
56 | |
57 effect | prefix | examples | |
58 ------------+--------+---------- | |
88786 | 59 acute | ' | 'a -> á, '' -> ´ |
60 grave | ` | `a -> à | |
61 circumflex | ^ | ^a -> â | |
62 diaeresis | \" | \"a -> ä \"\" -> ¨ | |
63 tilde | ~ | ~a -> ã | |
64 cedilla | ~ | ~c -> ç | |
65 misc | \" ~ / | \"s -> ß ~d -> ð ~t -> þ /a -> å /e -> æ /o -> ø | |
66 symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿ ~~ -> ¸ | |
67 | ~ | ~s -> § ~x -> ¤ ~. -> · ~$ -> £ ~u -> µ | |
68 | ~ | ~p -> ¶ ~- -> ~= -> ¯ ~| -> ¦ | |
69 symbol | _ / | _o -> º _a -> ª // -> ° /\\ -> × _y -> ¥ | |
70 | _ / | _: -> ÷ /c -> ¢ /2 -> ½ /4 -> ¼ /3 -> ¾ | |
71 | _ / | /= -> ¬ | |
72 symbol | ^ | ^r -> ® ^c -> © ^1 -> ¹ ^2 -> ² ^3 -> ³ | |
19652
c1b01ff226c4
Pass t for the SIMPLE argument to quail-define-package.
Richard M. Stallman <rms@gnu.org>
parents:
18716
diff
changeset
|
73 " nil t nil nil nil nil nil nil nil nil t) |
18673 | 74 |
75 (quail-define-rules | |
88786 | 76 ("'A" ?Á) |
77 ("'E" ?É) | |
78 ("'I" ?Í) | |
79 ("'O" ?Ó) | |
80 ("'U" ?Ú) | |
81 ("'Y" ?Ý) | |
82 ("'a" ?á) | |
83 ("'e" ?é) | |
84 ("'i" ?í) | |
85 ("'o" ?ó) | |
86 ("'u" ?ú) | |
87 ("'y" ?ý) | |
88 ("''" ?´) | |
18673 | 89 ("' " ?') |
88786 | 90 ("`A" ?À) |
91 ("`E" ?È) | |
92 ("`I" ?Ì) | |
93 ("`O" ?Ò) | |
94 ("`U" ?Ù) | |
95 ("`a" ?à) | |
96 ("`e" ?è) | |
97 ("`i" ?ì) | |
98 ("`o" ?ò) | |
99 ("`u" ?ù) | |
18673 | 100 ("``" ?`) |
101 ("` " ?`) | |
88786 | 102 ("^A" ?Â) |
103 ("^E" ?Ê) | |
104 ("^I" ?Î) | |
105 ("^O" ?Ô) | |
106 ("^U" ?Û) | |
107 ("^a" ?â) | |
108 ("^e" ?ê) | |
109 ("^i" ?î) | |
110 ("^o" ?ô) | |
111 ("^u" ?û) | |
18673 | 112 ("^^" ?^) |
113 ("^ " ?^) | |
88786 | 114 ("\"A" ?Ä) |
115 ("\"E" ?Ë) | |
116 ("\"I" ?Ï) | |
117 ("\"O" ?Ö) | |
118 ("\"U" ?Ü) | |
119 ("\"a" ?ä) | |
120 ("\"e" ?ë) | |
121 ("\"i" ?ï) | |
122 ("\"o" ?ö) | |
123 ("\"s" ?ß) | |
124 ("\"u" ?ü) | |
125 ("\"y" ?ÿ) | |
126 ("\"\"" ?¨) | |
18673 | 127 ("\" " ?\") |
88786 | 128 ("~A" ?Ã) |
129 ("~C" ?Ç) | |
130 ("~D" ?Ð) | |
131 ("~N" ?Ñ) | |
132 ("~O" ?Õ) | |
133 ("~T" ?Þ) | |
134 ("~a" ?ã) | |
135 ("~c" ?ç) | |
136 ("~d" ?ð) | |
137 ("~n" ?ñ) | |
138 ("~o" ?õ) | |
139 ("~t" ?þ) | |
140 ("~>" ?\») | |
141 ("~<" ?\«) | |
142 ("~!" ?¡) | |
143 ("~?" ?¿) | |
144 ("~~" ?¸) | |
18673 | 145 ("~ " ?~) |
88786 | 146 ("/A" ?Å) |
147 ("/E" ?Æ) | |
148 ("/O" ?Ø) | |
149 ("/a" ?å) | |
150 ("/e" ?æ) | |
151 ("/o" ?ø) | |
152 ("//" ?°) | |
21221
cb6ab6de7548
("latin-1-prefix"): Fix the translation of
Kenichi Handa <handa@m17n.org>
parents:
19652
diff
changeset
|
153 ("/ " ?/) |
88786 | 154 ("_o" ?º) |
155 ("_a" ?ª) | |
89483 | 156 ("_ " ? ) |
27940
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
157 ;; Symbols added by Roland Smith <rsmith@xs4all.nl> |
88786 | 158 ("_+" ?±) |
159 ("_y" ?¥) | |
160 ("_:" ?÷) | |
60516
fb4694e71d60
("latin-1-prefix"): Add rule "__"->"_".
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
161 ("__" ?_) |
88786 | 162 ("/c" ?¢) |
163 ("/\\" ?×) | |
164 ("/2" ?½) | |
165 ("/4" ?¼) | |
166 ("/3" ?¾) | |
167 ("~s" ?§) | |
168 ("~p" ?¶) | |
169 ("~x" ?¤) | |
170 ("~." ?·) | |
171 ("~$" ?£) | |
172 ("~u" ?µ) | |
173 ("^r" ?®) | |
174 ("^c" ?©) | |
175 ("^1" ?¹) | |
176 ("^2" ?²) | |
177 ("^3" ?³) | |
178 ("~-" ?) | |
179 ("~|" ?¦) | |
180 ("/=" ?¬) | |
181 ("~=" ?¯) | |
18673 | 182 ) |
183 | |
184 (quail-define-package | |
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
185 "catalan-prefix" "Latin-1" "CA>" t |
18673 | 186 "Catalan and Spanish input method with prefix modifiers |
187 | |
188 effect | prefix | examples | |
189 ------------+--------+---------- | |
88786 | 190 acute | ' | 'a -> á '' -> ´ |
191 grave | ` | `a -> à | |
192 diaeresis | \" | \"i -> ï \"\" -> ¨ | |
193 tilde | ~ | ~n -> ñ | |
194 cedilla | ~ | ~c -> ç | |
195 symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿ | |
19652
c1b01ff226c4
Pass t for the SIMPLE argument to quail-define-package.
Richard M. Stallman <rms@gnu.org>
parents:
18716
diff
changeset
|
196 " nil t nil nil nil nil nil nil nil nil t) |
18673 | 197 |
198 (quail-define-rules | |
88786 | 199 ("'A" ?Á) |
200 ("'E" ?É) | |
201 ("'I" ?Í) | |
202 ("'O" ?Ó) | |
203 ("'U" ?Ú) | |
204 ("'a" ?á) | |
205 ("'e" ?é) | |
206 ("'i" ?í) | |
207 ("'o" ?ó) | |
208 ("'u" ?ú) | |
18673 | 209 ("' " ?') |
88786 | 210 ("`A" ?À) |
211 ("`E" ?È) | |
212 ("`O" ?Ò) | |
213 ("`a" ?à) | |
214 ("`e" ?è) | |
215 ("`o" ?ò) | |
18673 | 216 ("` " ?`) |
88786 | 217 ("\"I" ?Ï) |
218 ("\"U" ?Ü) | |
219 ("\"i" ?ï) | |
220 ("\"u" ?ü) | |
18673 | 221 ("\" " ?\") |
88786 | 222 ("~C" ?Ç) |
223 ("~N" ?Ñ) | |
224 ("~c" ?ç) | |
225 ("~n" ?ñ) | |
226 ("~>" ?\») | |
227 ("~<" ?\«) | |
228 ("~!" ?¡) | |
229 ("~?" ?¿) | |
18673 | 230 ("~ " ?~) |
231 ) | |
232 | |
233 (quail-define-package | |
26822
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
234 "esperanto-prefix" "Latin-3" "EO>" t |
18673 | 235 "Esperanto input method with prefix modifiers |
236 Key translation rules are: | |
88786 | 237 ^H -> ?Ĥ ^J -> ?Ĵ ^h -> ?ĥ ^j -> ?ĵ ^C -> ?Ĉ ^G -> ?Ĝ, |
238 ^S -> ?Ŝ ^c -> ?ĉ ^g -> ?ĝ ^s -> ?ŝ ~U -> ?Ŭ ~u -> ?ŭ | |
19652
c1b01ff226c4
Pass t for the SIMPLE argument to quail-define-package.
Richard M. Stallman <rms@gnu.org>
parents:
18716
diff
changeset
|
239 " nil t nil nil nil nil nil nil nil nil t) |
18673 | 240 |
241 (quail-define-rules | |
88786 | 242 ("^H" ?Ĥ) |
243 ("^J" ?Ĵ) | |
244 ("^h" ?ĥ) | |
245 ("^j" ?ĵ) | |
246 ("^C" ?Ĉ) | |
247 ("^G" ?Ĝ) | |
248 ("^S" ?Ŝ) | |
249 ("^c" ?ĉ) | |
250 ("^g" ?ĝ) | |
251 ("^s" ?ŝ) | |
18673 | 252 ("^^" ?^) |
253 ("^ " ?^) | |
88786 | 254 ("~U" ?Ŭ) |
255 ("~u" ?ŭ) | |
18673 | 256 ("~ " ?~) |
257 ) | |
258 | |
259 (quail-define-package | |
42023
b8cca72f7c5f
("french-prefix", "german-prefix")
Dave Love <fx@gnu.org>
parents:
40708
diff
changeset
|
260 "french-prefix" "French" "FR>" t |
88786 | 261 "French (Français) input method with prefix modifiers |
18673 | 262 |
263 effect | prefix | examples | |
264 ------------+--------+---------- | |
88786 | 265 acute | ' | 'e -> é |
266 grave | ` | `a -> à | |
267 circumflex | ^ | ^a -> â | |
89909 | 268 diaeresis | \" | \"i -> ï |
88786 | 269 cedilla | ~ or , | ~c -> ç ,c -> ç |
270 symbol | ~ | ~> -> » ~< -> « | |
19652
c1b01ff226c4
Pass t for the SIMPLE argument to quail-define-package.
Richard M. Stallman <rms@gnu.org>
parents:
18716
diff
changeset
|
271 " nil t nil nil nil nil nil nil nil nil t) |
18673 | 272 |
273 (quail-define-rules | |
88786 | 274 ("'E" ?É) |
275 ("'C" ?Ç) | |
276 ("'e" ?é) | |
277 ("'c" ?ç) | |
18673 | 278 ("' " ?') |
88786 | 279 ("`A" ?À) |
280 ("`E" ?È) | |
281 ("`U" ?Ù) | |
282 ("`a" ?à) | |
283 ("`e" ?è) | |
284 ("`u" ?ù) | |
18673 | 285 ("` " ?`) |
88786 | 286 ("^A" ?Â) |
287 ("^E" ?Ê) | |
288 ("^I" ?Î) | |
289 ("^O" ?Ô) | |
290 ("^U" ?Û) | |
291 ("^a" ?â) | |
292 ("^e" ?ê) | |
293 ("^i" ?î) | |
294 ("^o" ?ô) | |
295 ("^u" ?û) | |
18673 | 296 ("^ " ?^) |
88786 | 297 ("\"E" ?Ë) |
298 ("\"I" ?Ï) | |
299 ("\"e" ?ë) | |
300 ("\"i" ?ï) | |
18673 | 301 ("\" " ?\") |
88786 | 302 ("~<" ?\«) |
303 ("~>" ?\») | |
304 ("~C" ?Ç) | |
305 ("~c" ?ç) | |
43128
d7ccb71bc97c
(french-prefix): ", " => "," and "~ " => "~". Don't define "~," at all.
Richard M. Stallman <rms@gnu.org>
parents:
43022
diff
changeset
|
306 ("~ " ?~) |
88786 | 307 (",C" ?Ç) |
308 (",c" ?ç) | |
43128
d7ccb71bc97c
(french-prefix): ", " => "," and "~ " => "~". Don't define "~," at all.
Richard M. Stallman <rms@gnu.org>
parents:
43022
diff
changeset
|
309 (", " ?,) |
18673 | 310 ) |
311 | |
312 (quail-define-package | |
24705
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
313 "romanian-prefix" "Romanian" "RO>" t |
88786 | 314 "Romanian (româneşte) input method with prefix modifiers |
24705
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
315 |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
316 effect | prefix | examples |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
317 ------------+--------+------------------ |
88786 | 318 tilde | ~ | ~a -> ă |
319 circumflex | ^ | ^a -> â, ^i -> î | |
320 cedilla | , | ,s -> ş, ,t -> ţ | |
24705
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
321 ~ | ~ | ~~ -> ~ |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
322 ^ | ^ | ^^ -> ^ |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
323 , | , | ,, -> , |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
324 " nil t nil nil nil nil nil nil nil nil t) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
325 |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
326 (quail-define-rules |
88786 | 327 ("~A" ?Ă) ("~a" ?ă) |
328 ("^A" ?Â) ("^a" ?â) | |
329 ("^I" ?Î) ("^i" ?î) | |
330 (",S" ?Ş) (",s" ?ş) | |
331 (",T" ?Ţ) (",t" ?ţ) | |
24705
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
332 ("^^" ?^) ("~~" ?~) (",," ?,)) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
333 |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
334 (quail-define-package |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
335 "romanian-alt-prefix" "Romanian" "RO>" t |
88786 | 336 "Alternative Romanian (româneşte) input method with prefix modifiers |
24705
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
337 |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
338 effect | prefix | examples |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
339 ------------+--------+------------------ |
88786 | 340 tilde | \" | \"a -> â |
341 circumflex | ' | 'a -> â, 'i -> î | |
342 cedilla | ' | 's -> ş, 't -> ţ | |
24705
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
343 ' | ' | '' -> ' |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
344 \" | \" | \"\" -> \" |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
345 " nil t nil nil nil nil nil nil nil nil t) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
346 |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
347 (quail-define-rules |
88786 | 348 ("'A" ?Ă) ("'a" ?ă) |
349 ("\"A" ?Â) ("\"a" ?â) | |
350 ("'I" ?Î) ("'i" ?î) | |
351 ("'S" ?Ş) ("'s" ?ş) | |
352 ("'T" ?Ţ) ("'t" ?ţ) | |
24705
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
353 ("''" ?') ("\"\"" ?\")) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
354 |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
355 (quail-define-package |
42023
b8cca72f7c5f
("french-prefix", "german-prefix")
Dave Love <fx@gnu.org>
parents:
40708
diff
changeset
|
356 "german-prefix" "German" "DE>" t |
18673 | 357 "German (Deutsch) input method with prefix modifiers |
358 Key translation rules are: | |
89909 | 359 \"A -> Ä -> \"O -> Ö \"U -> Ü \"s -> ß |
19652
c1b01ff226c4
Pass t for the SIMPLE argument to quail-define-package.
Richard M. Stallman <rms@gnu.org>
parents:
18716
diff
changeset
|
360 " nil t nil nil nil nil nil nil nil nil t) |
18673 | 361 |
362 (quail-define-rules | |
88786 | 363 ("\"A" ?Ä) |
364 ("\"O" ?Ö) | |
365 ("\"U" ?Ü) | |
366 ("\"a" ?ä) | |
367 ("\"o" ?ö) | |
368 ("\"u" ?ü) | |
369 ("\"s" ?ß) | |
18673 | 370 ("\" " ?\") |
371 ) | |
372 | |
373 (quail-define-package | |
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
374 "irish-prefix" "Latin-1" "GA>" t |
18673 | 375 "Irish input method with prefix modifiers |
376 Key translation rules are: | |
88786 | 377 'A -> Á 'E -> É 'I -> Í 'O -> Ó 'U -> Ú |
19652
c1b01ff226c4
Pass t for the SIMPLE argument to quail-define-package.
Richard M. Stallman <rms@gnu.org>
parents:
18716
diff
changeset
|
378 " nil t nil nil nil nil nil nil nil nil t) |
18673 | 379 |
380 (quail-define-rules | |
88786 | 381 ("'A" ?Á) |
382 ("'E" ?É) | |
383 ("'I" ?Í) | |
384 ("'O" ?Ó) | |
385 ("'U" ?Ú) | |
386 ("'a" ?á) | |
387 ("'e" ?é) | |
388 ("'i" ?í) | |
389 ("'o" ?ó) | |
390 ("'u" ?ú) | |
18673 | 391 ("' " ?') |
392 ) | |
393 | |
394 (quail-define-package | |
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
395 "portuguese-prefix" "Latin-1" "PT>" t |
18673 | 396 "Portuguese input method with prefix modifiers |
397 | |
398 effect | prefix | examples | |
399 ------------+--------+---------- | |
88786 | 400 acute | ' | 'a -> á '' -> ´ |
401 grave | ` | `a -> à | |
402 circumflex | ^ | ^a -> â | |
403 diaeresis | \" | \"u -> ü | |
404 tilde | ~ | ~a -> ã | |
405 cedilla | ' or , | 'c -> ç ,c -> ç | |
19652
c1b01ff226c4
Pass t for the SIMPLE argument to quail-define-package.
Richard M. Stallman <rms@gnu.org>
parents:
18716
diff
changeset
|
406 " nil t nil nil nil nil nil nil nil nil t) |
18673 | 407 |
408 (quail-define-rules | |
88786 | 409 ("'A" ?Á) |
410 ("'E" ?É) | |
411 ("'I" ?Í) | |
412 ("'O" ?Ó) | |
413 ("'U" ?Ú) | |
414 ("'C" ?Ç) | |
415 ("'a" ?á) | |
416 ("'e" ?é) | |
417 ("'i" ?í) | |
418 ("'o" ?ó) | |
419 ("'u" ?ú) | |
420 ("'c" ?ç) | |
18673 | 421 ("' " ?') |
88786 | 422 ("`A" ?À) |
423 ("`a" ?à) | |
18673 | 424 ("` " ?`) |
88786 | 425 ("^A" ?Â) |
426 ("^E" ?Ê) | |
427 ("^O" ?Ô) | |
428 ("^a" ?â) | |
429 ("^e" ?ê) | |
430 ("^o" ?ô) | |
18673 | 431 ("^ " ?^) |
88786 | 432 ("\"U" ?Ü) |
433 ("\"u" ?ü) | |
18673 | 434 ("\" " ?\") |
88786 | 435 ("~A" ?Ã) |
436 ("~O" ?Õ) | |
437 ("~a" ?ã) | |
438 ("~o" ?õ) | |
18673 | 439 ("~ " ?~) |
88786 | 440 (",c" ?ç) |
441 (",C" ?Ç) | |
18673 | 442 (",," ?,) |
443 ) | |
444 | |
445 (quail-define-package | |
42023
b8cca72f7c5f
("french-prefix", "german-prefix")
Dave Love <fx@gnu.org>
parents:
40708
diff
changeset
|
446 "spanish-prefix" "Spanish" "ES>" t |
88786 | 447 "Spanish (Español) input method with prefix modifiers |
18673 | 448 |
449 effect | prefix | examples | |
450 ------------+--------+---------- | |
88786 | 451 acute | ' | 'a -> á |
452 diaeresis | \" | \"u -> ü | |
453 tilde | ~ | ~n -> ñ | |
454 symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿ | |
19652
c1b01ff226c4
Pass t for the SIMPLE argument to quail-define-package.
Richard M. Stallman <rms@gnu.org>
parents:
18716
diff
changeset
|
455 " nil t nil nil nil nil nil nil nil nil t) |
18673 | 456 |
457 (quail-define-rules | |
88786 | 458 ("'A" ?Á) |
459 ("'E" ?É) | |
460 ("'I" ?Í) | |
461 ("'O" ?Ó) | |
462 ("'U" ?Ú) | |
463 ("'a" ?á) | |
464 ("'e" ?é) | |
465 ("'i" ?í) | |
466 ("'o" ?ó) | |
467 ("'u" ?ú) | |
18673 | 468 ("' " ?') |
88786 | 469 ("\"U" ?Ü) |
470 ("\"u" ?ü) | |
18673 | 471 ("\" " ?\") |
88786 | 472 ("~N" ?Ñ) |
473 ("~n" ?ñ) | |
474 ("~>" ?\») | |
475 ("~<" ?\«) | |
476 ("~!" ?¡) | |
477 ("~?" ?¿) | |
18673 | 478 ("~ " ?~) |
479 ) | |
480 | |
481 (quail-define-package | |
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
482 "latin-2-prefix" "Latin-2" "2>" t |
18673 | 483 "Latin-2 characters input method with prefix modifiers |
484 | |
485 effect | prefix | examples | |
486 ------------+--------+---------- | |
88786 | 487 acute | ' | 'a -> á '' -> ?´ |
488 circumflex | ^ | ^a -> â | |
489 diaeresis | \" | \"a -> ä \"\" -> ¨ | |
490 breve | ~ | ~a -> ă | |
491 caron | ~ | ~c -> č | |
492 cedilla | ` | `c -> ç `e -> ?ę | |
493 misc | ' ` ~ | 'd -> đ `l -> ł `z -> ż ~o -> ő ~u -> ű | |
494 symbol | ~ | `. -> ˙ ~~ -> ˘ ~. -> ?¸ | |
19652
c1b01ff226c4
Pass t for the SIMPLE argument to quail-define-package.
Richard M. Stallman <rms@gnu.org>
parents:
18716
diff
changeset
|
495 " nil t nil nil nil nil nil nil nil nil t) |
18673 | 496 |
497 (quail-define-rules | |
88786 | 498 ("'A" ?Á) |
499 ("'C" ?Ć) | |
500 ("'D" ?Đ) | |
501 ("'E" ?É) | |
502 ("'I" ?Í) | |
503 ("'L" ?Ĺ) | |
504 ("'N" ?Ń) | |
505 ("'O" ?Ó) | |
506 ("'R" ?Ŕ) | |
507 ("'S" ?Ś) | |
508 ("'U" ?Ú) | |
509 ("'Y" ?Ý) | |
510 ("'Z" ?Ź) | |
511 ("'a" ?á) | |
512 ("'c" ?ć) | |
513 ("'d" ?đ) | |
514 ("'e" ?é) | |
515 ("'i" ?í) | |
516 ("'l" ?ĺ) | |
517 ("'n" ?ń) | |
518 ("'o" ?ó) | |
519 ("'r" ?ŕ) | |
520 ("'s" ?ś) | |
521 ("'u" ?ú) | |
522 ("'y" ?ý) | |
523 ("'z" ?ź) | |
524 ("''" ?´) | |
18673 | 525 ("' " ?') |
88786 | 526 ("`A" ?Ą) |
527 ("`C" ?Ç) | |
528 ("`E" ?Ę) | |
529 ("`L" ?Ł) | |
530 ("`S" ?Ş) | |
531 ("`T" ?Ţ) | |
532 ("`Z" ?Ż) | |
533 ("`a" ?ą) | |
534 ("`l" ?ł) | |
535 ("`c" ?ç) | |
536 ("`e" ?ę) | |
537 ("`s" ?ş) | |
538 ("`t" ?ţ) | |
539 ("`z" ?ż) | |
540 ("``" ?Ş) | |
541 ("`." ?˙) | |
18673 | 542 ("` " ?`) |
88786 | 543 ("^A" ?Â) |
544 ("^I" ?Î) | |
545 ("^O" ?Ô) | |
546 ("^a" ?â) | |
547 ("^i" ?î) | |
548 ("^o" ?ô) | |
18673 | 549 ("^^" ?^) |
550 ("^ " ?^) | |
88786 | 551 ("\"A" ?Ä) |
552 ("\"E" ?Ë) | |
553 ("\"O" ?Ö) | |
554 ("\"U" ?Ü) | |
555 ("\"a" ?ä) | |
556 ("\"e" ?ë) | |
557 ("\"o" ?ö) | |
558 ("\"s" ?ß) | |
559 ("\"u" ?ü) | |
560 ("\"\"" ?¨) | |
18673 | 561 ("\" " ?\") |
88786 | 562 ("~A" ?Ă) |
563 ("~C" ?Č) | |
564 ("~D" ?Ď) | |
565 ("~E" ?Ě) | |
566 ("~L" ?Ľ) | |
567 ("~N" ?Ň) | |
568 ("~O" ?Ő) | |
569 ("~R" ?Ř) | |
570 ("~S" ?Š) | |
571 ("~T" ?Ť) | |
572 ("~U" ?Ű) | |
573 ("~Z" ?Ž) | |
574 ("~a" ?ă) | |
575 ("~c" ?č) | |
576 ("~d" ?ď) | |
577 ("~e" ?ě) | |
578 ("~l" ?ľ) | |
579 ("~n" ?ň) | |
580 ("~o" ?ő) | |
581 ("~r" ?ř) | |
582 ("~s" ?š) | |
583 ("~t" ?ť) | |
584 ("~u" ?ű) | |
585 ("~z" ?ž) | |
586 ("~v" ?˘) | |
587 ("~~" ?˘) | |
588 ("~." ?¸) | |
18673 | 589 ("~ " ?~) |
590 ) | |
591 | |
592 (quail-define-package | |
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
593 "latin-3-prefix" "Latin-3" "3>" t |
18673 | 594 "Latin-3 characters input method with prefix modifiers |
595 | |
596 effect | prefix | examples | |
597 ------------+--------+---------- | |
88786 | 598 acute | ' | 'a -> á '' -> ?´ |
599 grave | ` | `a -> à | |
600 circumflex | ^ | ^a -> â | |
601 diaeresis | \" | \"a -> ä \"\" -> ¨ | |
602 cedilla | ~ | ~c -> ç ~s -> ş ~~ -> ¸ | |
89483 | 603 dot above | / . | /g -> ġ .o -> ġ |
88786 | 604 misc | \" ~ / | \"s -> ß ~g -> ğ ~u -> ŭ /h -> ħ /i -> ı |
605 symbol | ~ | ~` -> ˘ /# -> £ /$ -> ¤ // -> ° | |
19652
c1b01ff226c4
Pass t for the SIMPLE argument to quail-define-package.
Richard M. Stallman <rms@gnu.org>
parents:
18716
diff
changeset
|
606 " nil t nil nil nil nil nil nil nil nil t) |
18673 | 607 |
608 (quail-define-rules | |
88786 | 609 ("'A" ?Á) |
610 ("'E" ?É) | |
611 ("'I" ?Í) | |
612 ("'O" ?Ó) | |
613 ("'U" ?Ú) | |
614 ("'a" ?á) | |
615 ("'e" ?é) | |
616 ("'i" ?í) | |
617 ("'o" ?ó) | |
618 ("'u" ?ú) | |
619 ("''" ?´) | |
18673 | 620 ("' " ?') |
88786 | 621 ("`A" ?À) |
622 ("`E" ?È) | |
623 ("`I" ?Ì) | |
624 ("`O" ?Ò) | |
625 ("`U" ?Ù) | |
626 ("`a" ?à) | |
627 ("`e" ?è) | |
628 ("`i" ?ì) | |
629 ("`o" ?ò) | |
630 ("`u" ?ù) | |
18673 | 631 ("``" ?`) |
632 ("` " ?`) | |
88786 | 633 ("^A" ?Â) |
634 ("^C" ?Ĉ) | |
635 ("^E" ?Ê) | |
636 ("^G" ?Ĝ) | |
637 ("^H" ?Ĥ) | |
638 ("^I" ?Î) | |
639 ("^J" ?Ĵ) | |
640 ("^O" ?Ô) | |
641 ("^S" ?Ŝ) | |
642 ("^U" ?Û) | |
643 ("^a" ?â) | |
644 ("^c" ?ĉ) | |
645 ("^e" ?ê) | |
646 ("^g" ?ĝ) | |
647 ("^h" ?ĥ) | |
648 ("^i" ?î) | |
649 ("^j" ?ĵ) | |
650 ("^o" ?ô) | |
651 ("^s" ?ŝ) | |
652 ("^u" ?û) | |
18673 | 653 ("^^" ?^) |
654 ("^ " ?^) | |
88786 | 655 ("\"A" ?Ä) |
656 ("\"E" ?Ë) | |
657 ("\"I" ?Ï) | |
658 ("\"O" ?Ö) | |
659 ("\"U" ?Ü) | |
660 ("\"a" ?ä) | |
661 ("\"e" ?ë) | |
662 ("\"i" ?ï) | |
663 ("\"o" ?ö) | |
664 ("\"u" ?ü) | |
665 ("\"s" ?ß) | |
666 ("\"\"" ?¨) | |
18673 | 667 ("\" " ?\") |
88786 | 668 ("~C" ?Ç) |
669 ("~N" ?Ñ) | |
670 ("~c" ?ç) | |
671 ("~n" ?ñ) | |
672 ("~S" ?Ş) | |
673 ("~s" ?ş) | |
674 ("~G" ?Ğ) | |
675 ("~g" ?ğ) | |
676 ("~U" ?Ŭ) | |
677 ("~u" ?ŭ) | |
678 ("~`" ?˘) | |
679 ("~~" ?¸) | |
18673 | 680 ("~ " ?~) |
88786 | 681 ("/C" ?Ċ) |
682 ("/G" ?Ġ) | |
683 ("/H" ?Ħ) | |
684 ("/I" ?İ) | |
685 ("/Z" ?Ż) | |
686 ("/c" ?ċ) | |
687 ("/g" ?ġ) | |
688 ("/h" ?ħ) | |
689 ("/i" ?ı) | |
690 ("/z" ?ż) | |
691 ("/." ?˙) | |
692 ("/#" ?£) | |
693 ("/$" ?¤) | |
694 ("//" ?°) | |
18673 | 695 ("/ " ?/) |
88786 | 696 (".C" ?Ċ) |
697 (".G" ?Ġ) | |
698 (".I" ?İ) | |
699 (".Z" ?Ż) | |
700 (".c" ?ċ) | |
701 (".g" ?ġ) | |
702 (".z" ?ż) | |
18673 | 703 ) |
28434
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
704 |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
705 |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
706 (quail-define-package |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
707 "polish-slash" "Polish" "PL>" nil |
50768
e9b4703b57d9
("polish-slash"): Add the rule "//"->?/.
Kenichi Handa <handa@m17n.org>
parents:
49600
diff
changeset
|
708 "Polish diacritics and slash character are input as `/[acelnosxzACELNOSXZ/]'. |
28434
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
709 For example, the character named `aogonek' is obtained by `/a'." |
31428
cc90f3f49ddf
("polish-slash"): Don't use keyboard translation.
Kenichi Handa <handa@m17n.org>
parents:
31268
diff
changeset
|
710 nil t t t nil nil nil nil nil nil t) |
28434
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
711 |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
712 (quail-define-rules |
50768
e9b4703b57d9
("polish-slash"): Add the rule "//"->?/.
Kenichi Handa <handa@m17n.org>
parents:
49600
diff
changeset
|
713 ("//" ?/) |
88786 | 714 ("/a" ?ą) |
715 ("/c" ?ć) | |
716 ("/e" ?ę) | |
717 ("/l" ?ł) | |
718 ("/n" ?ń) | |
89483 | 719 ("/o" ?ó) |
88786 | 720 ("/s" ?ś) |
721 ("/x" ?ź) | |
722 ("/z" ?ż) | |
723 ("/A" ?Ą) | |
724 ("/C" ?Ć) | |
725 ("/E" ?Ę) | |
726 ("/L" ?Ł) | |
727 ("/N" ?Ń) | |
89483 | 728 ("/O" ?Ó) |
88786 | 729 ("/S" ?Ś) |
730 ("/X" ?Ź) | |
731 ("/Z" ?Ż)) | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
732 |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
733 (quail-define-package |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
734 "latin-9-prefix" "Latin-9" "0>" t |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
735 "Latin-9 characters input method with prefix modifiers |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
736 |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
737 effect | prefix | examples |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
738 ------------+--------+---------- |
88786 | 739 acute | ' | 'a -> á |
740 grave | ` | `a -> à | |
741 circumflex | ^ | ^a -> â | |
742 diaeresis | \" | \"a -> ä, \"Y -> Ÿ | |
743 tilde | ~ | ~a -> ã | |
744 caron | ~ | ~z -> ž | |
745 cedilla | ~ | ~c -> ç | |
746 misc | \" ~ / | \"s -> ß ~d -> ð ~t -> þ /a -> å /e -> æ /o -> ø | |
747 | \" ~ / | /o -> œ | |
748 symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿ ~~ -> ž | |
749 | ~ | ~s -> § ~e -> € ~. -> · ~$ -> £ ~u -> µ | |
750 | ~ | ~- -> ~= -> ¯ | |
751 symbol | _ / | _o -> º _a -> ª // -> ° /\\ -> × _y -> ¥ | |
752 | _ / | _: -> ÷ /c -> ¢ ~p -> ¶ | |
753 | _ / | /= -> ¬ | |
754 symbol | ^ | ^r -> ® ^c -> © ^1 -> ¹ ^2 -> ² ^3 -> ³ _a -> ª | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
755 " nil t nil nil nil nil nil nil nil nil t) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
756 |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
757 (quail-define-rules |
88786 | 758 ("'A" ?Á) |
759 ("'E" ?É) | |
760 ("'I" ?Í) | |
761 ("'O" ?Ó) | |
762 ("'U" ?Ú) | |
763 ("'Y" ?Ý) | |
764 ("'a" ?á) | |
765 ("'e" ?é) | |
766 ("'i" ?í) | |
767 ("'o" ?ó) | |
768 ("'u" ?ú) | |
769 ("'y" ?ý) | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
770 ("' " ?') |
88786 | 771 ("`A" ?À) |
772 ("`E" ?È) | |
773 ("`I" ?Ì) | |
774 ("`O" ?Ò) | |
775 ("`U" ?Ù) | |
776 ("`a" ?à) | |
777 ("`e" ?è) | |
778 ("`i" ?ì) | |
779 ("`o" ?ò) | |
780 ("`u" ?ù) | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
781 ("``" ?`) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
782 ("` " ?`) |
88786 | 783 ("^A" ?Â) |
784 ("^E" ?Ê) | |
785 ("^I" ?Î) | |
786 ("^O" ?Ô) | |
787 ("^U" ?Û) | |
788 ("^a" ?â) | |
789 ("^e" ?ê) | |
790 ("^i" ?î) | |
791 ("^o" ?ô) | |
792 ("^u" ?û) | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
793 ("^^" ?^) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
794 ("^ " ?^) |
88786 | 795 ("\"A" ?Ä) |
796 ("\"E" ?Ë) | |
797 ("\"I" ?Ï) | |
798 ("\"O" ?Ö) | |
799 ("\"U" ?Ü) | |
800 ("\"a" ?ä) | |
801 ("\"e" ?ë) | |
802 ("\"i" ?ï) | |
803 ("\"o" ?ö) | |
804 ("\"s" ?ß) | |
805 ("\"u" ?ü) | |
806 ("\"y" ?ÿ) | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
807 ("\" " ?\") |
88786 | 808 ("~A" ?Ã) |
809 ("~C" ?Ç) | |
810 ("~D" ?Ð) | |
811 ("~N" ?Ñ) | |
812 ("~O" ?Õ) | |
813 ("~S" ?Š) | |
814 ("~T" ?Þ) | |
815 ("~Z" ?Ž) | |
816 ("~a" ?ã) | |
817 ("~c" ?ç) | |
818 ("~d" ?ð) | |
819 ("~n" ?ñ) | |
820 ("~o" ?õ) | |
821 ("~s" ?š) | |
822 ("~t" ?þ) | |
823 ("~z" ?ž) | |
824 ("~>" ?\») | |
825 ("~<" ?\«) | |
826 ("~!" ?¡) | |
827 ("~?" ?¿) | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
828 ("~ " ?~) |
88786 | 829 ("/A" ?Å) |
830 ("/E" ?Æ) | |
831 ("/O" ?Ø) | |
832 ("/a" ?å) | |
833 ("/e" ?æ) | |
834 ("/o" ?ø) | |
835 ("//" ?°) | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
836 ("/ " ?/) |
88786 | 837 ("_o" ?º) |
838 ("_a" ?ª) | |
839 ("_+" ?±) | |
840 ("_y" ?¥) | |
841 ("_:" ?÷) | |
90116
29e773288013
Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-23
Miles Bader <miles@gnu.org>
diff
changeset
|
842 ("_ " ? ) |
60516
fb4694e71d60
("latin-1-prefix"): Add rule "__"->"_".
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
843 ("__" ?_) |
88786 | 844 ("/c" ?¢) |
845 ("/\\" ?×) | |
846 ("/o" ?œ) ; clash with ø, but æ uses / | |
847 ("/O" ?Œ) | |
848 ("\"Y" ?Ÿ) | |
849 ("~s" ?§) | |
850 ("~p" ?¶) | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
851 ;; Is this the best option for Euro entry? |
88786 | 852 ("~e" ?€) |
853 ("~." ?·) | |
854 ("~$" ?£) | |
855 ("~u" ?µ) | |
856 ("^r" ?®) | |
857 ("^c" ?©) | |
858 ("^1" ?¹) | |
859 ("^2" ?²) | |
860 ("^3" ?³) | |
861 ("~-" ?) | |
862 ("~=" ?¯) | |
863 ("/=" ?¬)) | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
864 |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
865 ;; Latin-8 was done by an Englishman -- Johnny Celt should take a |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
866 ;; squint at it. |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
867 |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
868 (quail-define-package |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
869 "latin-8-prefix" "Latin-8" "8>" t |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
870 "Latin-8 characters input method with prefix modifiers |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
871 |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
872 effect | prefix | examples |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
873 ------------+--------+---------- |
88786 | 874 acute | ' | 'a -> á |
875 grave | ` | `a -> à | |
876 circumflex | ^ | ^w -> ŵ | |
877 diaeresis | \" | \"a -> ä | |
878 dot above | . | .b -> ḃ | |
879 tilde | ~ | ~a -> ã | |
880 cedilla | ~ | ~c -> ç | |
881 misc | \" ~ / | \"s -> ß /a -> å /e -> æ /o -> ø | |
882 | ~ | ~s -> § ~$ -> £ ~p -> ¶ | |
883 symbol | ^ | ^r -> ® ^c -> © | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
884 " nil t nil nil nil nil nil nil nil nil t) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
885 |
46664 | 886 ;; Basically following Latin-1, plus dottiness from Latin-3. |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
887 (quail-define-rules |
88786 | 888 (".B" ?Ḃ) |
889 (".b" ?ḃ) | |
890 (".c" ?ċ) | |
891 (".C" ?Ċ) | |
892 (".D" ?Ḋ) | |
893 (".d" ?ḋ) | |
894 (".f" ?ḟ) | |
895 (".F" ?Ḟ) | |
896 (".g" ?ġ) | |
897 (".G" ?Ġ) | |
898 (".m" ?ṁ) | |
899 (".M" ?Ṁ) | |
900 (".p" ?ṗ) | |
901 (".P" ?Ṗ) | |
902 (".s" ?ṡ) | |
903 (".S" ?Ṡ) | |
904 (".t" ?ṫ) | |
905 (".T" ?Ṫ) | |
906 ("'A" ?Á) | |
907 ("'E" ?É) | |
908 ("'I" ?Í) | |
909 ("'O" ?Ó) | |
910 ("'U" ?Ú) | |
911 ("'Y" ?Ý) | |
912 ("'W" ?Ẃ) | |
913 ("'a" ?á) | |
914 ("'e" ?é) | |
915 ("'i" ?í) | |
916 ("'o" ?ó) | |
917 ("'u" ?ú) | |
918 ("'w" ?ẃ) | |
919 ("'y" ?ý) | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
920 ("' " ?') |
88786 | 921 ("`A" ?À) |
922 ("`E" ?È) | |
923 ("`I" ?Ì) | |
924 ("`O" ?Ò) | |
925 ("`U" ?Ù) | |
926 ("`W" ?Ẁ) | |
927 ("`Y" ?Ỳ) | |
928 ("`a" ?à) | |
929 ("`e" ?è) | |
930 ("`i" ?ì) | |
931 ("`o" ?ò) | |
932 ("`u" ?ù) | |
933 ("`w" ?ẁ) | |
934 ("`y" ?ỳ) | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
935 ("``" ?`) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
936 ("` " ?`) |
88786 | 937 ("^A" ?Â) |
938 ("^E" ?Ê) | |
939 ("^I" ?Î) | |
940 ("^O" ?Ô) | |
941 ("^U" ?Û) | |
942 ("^a" ?â) | |
943 ("^e" ?ê) | |
944 ("^i" ?î) | |
945 ("^o" ?ô) | |
946 ("^u" ?û) | |
947 ("^w" ?ŵ) | |
948 ("^W" ?Ŵ) | |
949 ("^y" ?ŷ) | |
950 ("^Y" ?Ŷ) | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
951 ("^^" ?^) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
952 ("^ " ?^) |
88786 | 953 ("\"A" ?Ä) |
954 ("\"E" ?Ë) | |
955 ("\"I" ?Ï) | |
956 ("\"O" ?Ö) | |
957 ("\"U" ?Ü) | |
958 ("\"a" ?ä) | |
959 ("\"e" ?ë) | |
960 ("\"i" ?ï) | |
961 ("\"o" ?ö) | |
962 ("\"s" ?ß) | |
963 ("\"u" ?ü) | |
964 ("\"w" ?ẅ) | |
965 ("\"W" ?Ẅ) | |
966 ("\"y" ?ÿ) | |
967 ("\"Y" ?Ÿ) | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
968 ("\" " ?\") |
88786 | 969 ("~A" ?Ã) |
970 ("~C" ?Ç) | |
971 ("~N" ?Ñ) | |
972 ("~O" ?Õ) | |
973 ("~a" ?ã) | |
974 ("~c" ?ç) | |
975 ("~n" ?ñ) | |
976 ("~o" ?õ) | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
977 ("~ " ?~) |
88786 | 978 ("/A" ?Å) |
979 ("/E" ?Æ) | |
980 ("/O" ?Ø) | |
981 ("/a" ?å) | |
982 ("/e" ?æ) | |
983 ("/o" ?ø) | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
984 ("/ " ?/) |
88786 | 985 ("~p" ?¶) |
986 ("~s" ?§) | |
987 ("~$" ?£) | |
988 ("^r" ?®) | |
989 ("^c" ?©)) | |
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
34694
diff
changeset
|
990 |
46667 | 991 (quail-define-package |
992 "latin-prefix" "Latin" "L>" t | |
993 "Latin characters input method with prefix modifiers. | |
994 This is the union of various input methods originally made for input | |
995 of characters from a single Latin-N charset. | |
996 | |
997 effect | prefix | examples | |
998 ------------+--------+---------- | |
88786 | 999 acute | ' | 'a -> á, '' -> ´ |
1000 grave | ` | `a -> à | |
1001 circumflex | ^ | ^a -> â | |
1002 diaeresis | \" | \"a -> ä \"\" -> ¨ | |
1003 tilde | ~ | ~a -> ã | |
1004 cedilla | ~ | ~c -> ç | |
1005 breve | ~ | ~a -> ă | |
1006 caron | ~ | ~c -> č | |
1007 dot above | ~ / . | ~o -> ġ /o -> ġ .o -> ġ | |
1008 misc | \" ~ / | \"s -> ß ~d -> ð ~t -> þ /a -> å /e -> æ /o -> ø | |
1009 symbol | ~ | ~> -> » ~< -> « ~! -> ¡ ~? -> ¿ ~~ -> ¸ | |
1010 symbol | _ / | _o -> º _a -> ª // -> ° /\\ -> × _y -> ¥ | |
1011 symbol | ^ | ^r -> ® ^c -> © ^1 -> ¹ ^2 -> ² ^3 -> ³ | |
46667 | 1012 " nil t nil nil nil nil nil nil nil nil t) |
1013 | |
1014 (quail-define-rules | |
1015 ("' " ?') | |
88786 | 1016 ("''" ?´) |
1017 ("'A" ?Á) | |
1018 ("'E" ?É) | |
1019 ("'I" ?Í) | |
1020 ("'O" ?Ó) | |
1021 ("'U" ?Ú) | |
1022 ("'W" ?Ẃ) | |
1023 ("'Y" ?Ý) | |
1024 ("'a" ?á) | |
1025 ("'e" ?é) | |
1026 ("'i" ?í) | |
1027 ("'o" ?ó) | |
1028 ("'u" ?ú) | |
1029 ("'w" ?ẃ) | |
1030 ("'y" ?ý) | |
1031 (".B" ?Ḃ) | |
1032 (".C" ?Ċ) | |
1033 (".D" ?Ḋ) | |
1034 (".F" ?Ḟ) | |
1035 (".G" ?Ġ) | |
1036 (".I" ?İ) | |
1037 (".M" ?Ṁ) | |
1038 (".P" ?Ṗ) | |
1039 (".S" ?Ṡ) | |
1040 (".T" ?Ṫ) | |
1041 (".Z" ?Ż) | |
1042 (".b" ?ḃ) | |
1043 (".c" ?ċ) | |
1044 (".d" ?ḋ) | |
1045 (".f" ?ḟ) | |
1046 (".g" ?ġ) | |
1047 (".m" ?ṁ) | |
1048 (".p" ?ṗ) | |
1049 (".s" ?ṡ) | |
1050 (".t" ?ṫ) | |
1051 (".z" ?ż) | |
46667 | 1052 ("/ " ?/) |
88786 | 1053 ("/#" ?£) |
1054 ("/$" ?¤) | |
1055 ("/." ?˙) | |
1056 ("//" ?°) | |
1057 ("/2" ?½) | |
1058 ("/3" ?¾) | |
1059 ("/4" ?¼) | |
1060 ("/=" ?¬) | |
1061 ("/A" ?Å) | |
1062 ("/C" ?Ċ) | |
1063 ("/E" ?Æ) | |
1064 ("/G" ?Ġ) | |
1065 ("/H" ?Ħ) | |
1066 ("/I" ?İ) | |
1067 ("/O" ?Ø) | |
1068 ("/O" ?Œ) | |
1069 ("/Z" ?Ż) | |
1070 ("/\\" ?×) | |
1071 ("/a" ?å) | |
1072 ("/c" ?¢) | |
1073 ("/c" ?ċ) | |
1074 ("/e" ?æ) | |
1075 ("/g" ?ġ) | |
1076 ("/h" ?ħ) | |
1077 ("/i" ?ı) | |
1078 ("/o" ?ø) | |
1079 ("/o" ?œ) | |
1080 ("/z" ?ż) | |
46667 | 1081 ("\" " ?\") |
88786 | 1082 ("\"A" ?Ä) |
1083 ("\"E" ?Ë) | |
1084 ("\"I" ?Ï) | |
1085 ("\"O" ?Ö) | |
1086 ("\"U" ?Ü) | |
1087 ("\"W" ?Ẅ) | |
1088 ("\"Y" ?Ÿ) | |
1089 ("\"\"" ?¨) | |
1090 ("\"a" ?ä) | |
1091 ("\"e" ?ë) | |
1092 ("\"i" ?ï) | |
1093 ("\"o" ?ö) | |
1094 ("\"s" ?ß) | |
1095 ("\"u" ?ü) | |
1096 ("\"w" ?ẅ) | |
1097 ("\"y" ?ÿ) | |
46667 | 1098 ("^ " ?^) |
88786 | 1099 ("^1" ?¹) |
1100 ("^2" ?²) | |
1101 ("^3" ?³) | |
1102 ("^A" ?Â) | |
1103 ("^C" ?Ĉ) | |
1104 ("^E" ?Ê) | |
1105 ("^G" ?Ĝ) | |
1106 ("^H" ?Ĥ) | |
1107 ("^I" ?Î) | |
1108 ("^J" ?Ĵ) | |
1109 ("^O" ?Ô) | |
1110 ("^S" ?Ŝ) | |
1111 ("^U" ?Û) | |
1112 ("^W" ?Ŵ) | |
1113 ("^Y" ?Ŷ) | |
46667 | 1114 ("^^" ?^) |
88786 | 1115 ("^a" ?â) |
1116 ("^c" ?©) | |
1117 ("^c" ?ĉ) | |
1118 ("^e" ?ê) | |
1119 ("^g" ?ĝ) | |
1120 ("^h" ?ĥ) | |
1121 ("^i" ?î) | |
1122 ("^j" ?ĵ) | |
1123 ("^o" ?ô) | |
1124 ("^r" ?®) | |
1125 ("^s" ?ŝ) | |
1126 ("^u" ?û) | |
1127 ("^w" ?ŵ) | |
1128 ("^y" ?ŷ) | |
1129 ("_+" ?±) | |
1130 ("_:" ?÷) | |
1131 ("_a" ?ª) | |
1132 ("_o" ?º) | |
1133 ("_y" ?¥) | |
1134 ("_ " ? ) | |
46667 | 1135 ("` " ?`) |
88786 | 1136 ("`A" ?À) |
1137 ("`E" ?È) | |
1138 ("`I" ?Ì) | |
1139 ("`O" ?Ò) | |
1140 ("`U" ?Ù) | |
1141 ("`W" ?Ẁ) | |
1142 ("`Y" ?Ỳ) | |
46667 | 1143 ("``" ?`) |
88786 | 1144 ("`a" ?à) |
1145 ("`e" ?è) | |
1146 ("`i" ?ì) | |
1147 ("`o" ?ò) | |
1148 ("`u" ?ù) | |
1149 ("`w" ?ẁ) | |
1150 ("`y" ?ỳ) | |
46667 | 1151 ("~ " ?~) |
88786 | 1152 ("~!" ?¡) |
1153 ("~$" ?£) | |
1154 ("~-" ?) | |
1155 ("~." ?·) | |
1156 ("~<" ?\«) | |
1157 ("~=" ?¯) | |
1158 ("~>" ?\») | |
1159 ("~?" ?¿) | |
1160 ("~A" ?Ã) | |
1161 ("~C" ?Ç) | |
1162 ("~D" ?Ð) | |
1163 ("~G" ?Ğ) | |
1164 ("~N" ?Ñ) | |
1165 ("~O" ?Õ) | |
1166 ("~O" ?Ġ) | |
1167 ("~S" ?Ş) | |
1168 ("~S" ?Š) | |
1169 ("~T" ?Þ) | |
1170 ("~U" ?Ŭ) | |
1171 ("~Z" ?Ž) | |
1172 ("~`" ?˘) | |
1173 ("~a" ?ã) | |
1174 ("~c" ?ç) | |
1175 ("~d" ?ð) | |
1176 ("~e" ?€) | |
1177 ("~g" ?ğ) | |
1178 ("~n" ?ñ) | |
1179 ("~o" ?õ) | |
1180 ("~o" ?ġ) | |
1181 ("~p" ?¶) | |
1182 ("~s" ?§) | |
1183 ("~s" ?ş) | |
1184 ("~s" ?š) | |
1185 ("~t" ?þ) | |
1186 ("~u" ?µ) | |
1187 ("~u" ?ŭ) | |
1188 ("~x" ?¤) | |
1189 ("~z" ?ž) | |
1190 ("~|" ?¦) | |
1191 ("~~" ?¸) | |
46667 | 1192 ) |
52401 | 1193 |
1194 ;;; arch-tag: 83017837-6b84-4366-b183-e0577e3ed838 | |
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
34694
diff
changeset
|
1195 ;;; latin-pre.el ends here |