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