Mercurial > emacs
annotate leim/quail/latin-pre.el @ 80507:65aec0fc638d
Docstring change.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Sat, 12 Apr 2008 05:17:39 +0000 |
parents | 3ca83a726835 |
children | 606f2d163a64 |
rev | line source |
---|---|
40708 | 1 ;;; latin-pre.el --- Quail packages for inputting various European characters -*-coding: iso-2022-7bit;-*- |
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: |
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
34694
diff
changeset
|
38 ;; Author: W,B3(Bodek Bzyl <matwb@univ.gda.pl> |
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
34694
diff
changeset
|
39 ;; Maintainer: W,B3(Bodek 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 ------------+--------+---------- | |
59 acute | ' | 'a -> ,Aa(B, '' -> ,A4(B | |
60 grave | ` | `a -> ,A`(B | |
61 circumflex | ^ | ^a -> ,Ab(B | |
27940
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
62 diaeresis | \" | \"a -> ,Ad(B \"\" -> ,A((B |
18673 | 63 tilde | ~ | ~a -> ,Ac(B |
64 cedilla | ~ | ~c -> ,Ag(B | |
27940
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
65 misc | \" ~ / | \"s -> ,A_(B ~d -> ,Ap(B ~t -> ,A~(B /a -> ,Ae(B /e -> ,Af(B /o -> ,Ax(B |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
66 symbol | ~ | ~> -> ,A;(B ~< -> ,A+(B ~! -> ,A!(B ~? -> ,A?(B ~~ -> ,A8(B |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
67 | ~ | ~s -> ,A'(B ~x -> ,A$(B ~. -> ,A7(B ~$ -> ,A#(B ~u -> ,A5(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
68 | ~ | ~p -> ,A6(B ~- -> ,A-(B ~= -> ,A/(B ~| -> ,A&(B |
27940
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
69 symbol | _ / | _o -> ,A:(B _a -> ,A*(B // -> ,A0(B /\\ -> ,AW(B _y -> ,A%(B |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
70 | _ / | _: -> ,Aw(B /c -> ,A"(B /2 -> ,A=(B /4 -> ,A<(B /3 -> ,A>(B |
46664 | 71 | _ / | /= -> ,A,(B |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
72 symbol | ^ | ^r -> ,A.(B ^c -> ,A)(B ^1 -> ,A9(B ^2 -> ,A2(B ^3 -> ,A3(B |
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 | |
76 ("'A" ?,AA(B) | |
77 ("'E" ?,AI(B) | |
78 ("'I" ?,AM(B) | |
79 ("'O" ?,AS(B) | |
80 ("'U" ?,AZ(B) | |
81 ("'Y" ?,A](B) | |
82 ("'a" ?,Aa(B) | |
83 ("'e" ?,Ai(B) | |
84 ("'i" ?,Am(B) | |
85 ("'o" ?,As(B) | |
86 ("'u" ?,Az(B) | |
87 ("'y" ?,A}(B) | |
88 ("''" ?,A4(B) | |
89 ("' " ?') | |
90 ("`A" ?,A@(B) | |
91 ("`E" ?,AH(B) | |
92 ("`I" ?,AL(B) | |
93 ("`O" ?,AR(B) | |
94 ("`U" ?,AY(B) | |
95 ("`a" ?,A`(B) | |
96 ("`e" ?,Ah(B) | |
97 ("`i" ?,Al(B) | |
98 ("`o" ?,Ar(B) | |
99 ("`u" ?,Ay(B) | |
100 ("``" ?`) | |
101 ("` " ?`) | |
102 ("^A" ?,AB(B) | |
103 ("^E" ?,AJ(B) | |
104 ("^I" ?,AN(B) | |
105 ("^O" ?,AT(B) | |
106 ("^U" ?,A[(B) | |
107 ("^a" ?,Ab(B) | |
108 ("^e" ?,Aj(B) | |
109 ("^i" ?,An(B) | |
110 ("^o" ?,At(B) | |
111 ("^u" ?,A{(B) | |
112 ("^^" ?^) | |
113 ("^ " ?^) | |
114 ("\"A" ?,AD(B) | |
115 ("\"E" ?,AK(B) | |
116 ("\"I" ?,AO(B) | |
117 ("\"O" ?,AV(B) | |
118 ("\"U" ?,A\(B) | |
119 ("\"a" ?,Ad(B) | |
120 ("\"e" ?,Ak(B) | |
121 ("\"i" ?,Ao(B) | |
122 ("\"o" ?,Av(B) | |
123 ("\"s" ?,A_(B) | |
124 ("\"u" ?,A|(B) | |
125 ("\"y" ?,A(B) | |
126 ("\"\"" ?,A((B) | |
127 ("\" " ?\") | |
128 ("~A" ?,AC(B) | |
129 ("~C" ?,AG(B) | |
130 ("~D" ?,AP(B) | |
131 ("~N" ?,AQ(B) | |
132 ("~O" ?,AU(B) | |
133 ("~T" ?,A^(B) | |
134 ("~a" ?,Ac(B) | |
135 ("~c" ?,Ag(B) | |
136 ("~d" ?,Ap(B) | |
137 ("~n" ?,Aq(B) | |
138 ("~o" ?,Au(B) | |
139 ("~t" ?,A~(B) | |
140 ("~>" ?\,A;(B) | |
141 ("~<" ?\,A+(B) | |
142 ("~!" ?,A!(B) | |
143 ("~?" ?,A?(B) | |
144 ("~~" ?,A8(B) | |
145 ("~ " ?~) | |
146 ("/A" ?,AE(B) | |
147 ("/E" ?,AF(B) | |
148 ("/O" ?,AX(B) | |
149 ("/a" ?,Ae(B) | |
150 ("/e" ?,Af(B) | |
151 ("/o" ?,Ax(B) | |
152 ("//" ?,A0(B) | |
21221
cb6ab6de7548
("latin-1-prefix"): Fix the translation of
Kenichi Handa <handa@m17n.org>
parents:
19652
diff
changeset
|
153 ("/ " ?/) |
23470 | 154 ("_o" ?,A:(B) |
155 ("_a" ?,A*(B) | |
46664 | 156 ("_ " ?,A (B) |
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> |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
158 ("_+" ?,A1(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
159 ("_y" ?,A%(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
160 ("_:" ?,Aw(B) |
60516
fb4694e71d60
("latin-1-prefix"): Add rule "__"->"_".
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
161 ("__" ?_) |
27940
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
162 ("/c" ?,A"(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
163 ("/\\" ?,AW(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
164 ("/2" ?,A=(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
165 ("/4" ?,A<(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
166 ("/3" ?,A>(B) |
31134
00918609ef4a
("latin-1-prefix"): Change ~s to give ,A'(B and
Dave Love <fx@gnu.org>
parents:
28434
diff
changeset
|
167 ("~s" ?,A'(B) |
00918609ef4a
("latin-1-prefix"): Change ~s to give ,A'(B and
Dave Love <fx@gnu.org>
parents:
28434
diff
changeset
|
168 ("~p" ?,A6(B) |
27940
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
169 ("~x" ?,A$(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
170 ("~." ?,A7(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
171 ("~$" ?,A#(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
172 ("~u" ?,A5(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
173 ("^r" ?,A.(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
174 ("^c" ?,A)(B) |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
175 ("^1" ?,A9(B) |
27940
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
176 ("^2" ?,A2(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
177 ("^3" ?,A3(B) |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
178 ("~-" ?,A-(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
179 ("~|" ?,A&(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
180 ("/=" ?,A,(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
181 ("~=" ?,A/(B) |
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 ------------+--------+---------- | |
23470 | 190 acute | ' | 'a -> ,Aa(B '' -> ,A4(B |
18673 | 191 grave | ` | `a -> ,A`(B |
23470 | 192 diaeresis | \" | \"i -> ,Ao(B \"\" -> ,A((B |
18673 | 193 tilde | ~ | ~n -> ,Aq(B |
194 cedilla | ~ | ~c -> ,Ag(B | |
23470 | 195 symbol | ~ | ~> -> ,A;(B ~< -> ,A+(B ~! -> ,A!(B ~? -> ,A?(B |
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 | |
199 ("'A" ?,AA(B) | |
200 ("'E" ?,AI(B) | |
201 ("'I" ?,AM(B) | |
202 ("'O" ?,AS(B) | |
203 ("'U" ?,AZ(B) | |
204 ("'a" ?,Aa(B) | |
205 ("'e" ?,Ai(B) | |
206 ("'i" ?,Am(B) | |
207 ("'o" ?,As(B) | |
208 ("'u" ?,Az(B) | |
209 ("' " ?') | |
210 ("`A" ?,A@(B) | |
211 ("`E" ?,AH(B) | |
212 ("`O" ?,AR(B) | |
213 ("`a" ?,A`(B) | |
214 ("`e" ?,Ah(B) | |
215 ("`o" ?,Ar(B) | |
216 ("` " ?`) | |
217 ("\"I" ?,AO(B) | |
218 ("\"U" ?,A\(B) | |
219 ("\"i" ?,Ao(B) | |
220 ("\"u" ?,A|(B) | |
221 ("\" " ?\") | |
222 ("~C" ?,AG(B) | |
223 ("~N" ?,AQ(B) | |
224 ("~c" ?,Ag(B) | |
225 ("~n" ?,Aq(B) | |
226 ("~>" ?\,A;(B) | |
227 ("~<" ?\,A+(B) | |
228 ("~!" ?,A!(B) | |
229 ("~?" ?,A?(B) | |
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: | |
26822
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
237 ^H -> ?,C&(B ^J -> ?,C,(B ^h -> ?,C6(B ^j -> ?,C<(B ^C -> ?,CF(B ^G -> ?,CX(B, |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
238 ^S -> ?,C^(B ^c -> ?,Cf(B ^g -> ?,Cx(B ^s -> ?,C~(B ~U -> ?,C](B ~u -> ?,C}(B |
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 | |
26822
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
242 ("^H" ?,C&(B) |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
243 ("^J" ?,C,(B) |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
244 ("^h" ?,C6(B) |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
245 ("^j" ?,C<(B) |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
246 ("^C" ?,CF(B) |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
247 ("^G" ?,CX(B) |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
248 ("^S" ?,C^(B) |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
249 ("^c" ?,Cf(B) |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
250 ("^g" ?,Cx(B) |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
251 ("^s" ?,C~(B) |
18673 | 252 ("^^" ?^) |
253 ("^ " ?^) | |
26822
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
254 ("~U" ?,C](B) |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
255 ("~u" ?,C}(B) |
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 |
18673 | 261 "French (Fran,Ag(Bais) input method with prefix modifiers |
262 | |
263 effect | prefix | examples | |
264 ------------+--------+---------- | |
265 acute | ' | 'e -> ,Ai(B | |
266 grave | ` | `a -> ,A`(B | |
267 circumflex | ^ | ^a -> ,Ab(B | |
52246
dafe00f2eaab
("french-prefix"): Fix spacing in docstring.
Markus Rost <rost@math.uni-bielefeld.de>
parents:
50768
diff
changeset
|
268 diaeresis | \" | \"i -> ,Ao(B |
23470 | 269 cedilla | ~ or , | ~c -> ,Ag(B ,c -> ,Ag(B |
270 symbol | ~ | ~> -> ,A;(B ~< -> ,A+(B | |
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 | |
274 ("'E" ?,AI(B) | |
275 ("'C" ?,AG(B) | |
276 ("'e" ?,Ai(B) | |
277 ("'c" ?,Ag(B) | |
278 ("' " ?') | |
279 ("`A" ?,A@(B) | |
280 ("`E" ?,AH(B) | |
281 ("`U" ?,AY(B) | |
282 ("`a" ?,A`(B) | |
283 ("`e" ?,Ah(B) | |
284 ("`u" ?,Ay(B) | |
285 ("` " ?`) | |
286 ("^A" ?,AB(B) | |
287 ("^E" ?,AJ(B) | |
288 ("^I" ?,AN(B) | |
289 ("^O" ?,AT(B) | |
290 ("^U" ?,A[(B) | |
291 ("^a" ?,Ab(B) | |
292 ("^e" ?,Aj(B) | |
293 ("^i" ?,An(B) | |
294 ("^o" ?,At(B) | |
295 ("^u" ?,A{(B) | |
296 ("^ " ?^) | |
297 ("\"E" ?,AK(B) | |
298 ("\"I" ?,AO(B) | |
299 ("\"e" ?,Ak(B) | |
300 ("\"i" ?,Ao(B) | |
301 ("\" " ?\") | |
302 ("~<" ?\,A+(B) | |
303 ("~>" ?\,A;(B) | |
304 ("~C" ?,AG(B) | |
305 ("~c" ?,Ag(B) | |
43128
d7ccb71bc97c
(french-prefix): ", " => "," and "~ " => "~". Don't define "~," at all.
Richard M. Stallman <rms@gnu.org>
parents:
43022
diff
changeset
|
306 ("~ " ?~) |
18673 | 307 (",C" ?,AG(B) |
308 (",c" ?,Ag(B) | |
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 |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
314 "Romanian (rom,Bb(Bne,B:(Bte) input method with prefix modifiers |
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 ------------+--------+------------------ |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
318 tilde | ~ | ~a -> ,Bc(B |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
319 circumflex | ^ | ^a -> ,Bb(B, ^i -> ,Bn(B |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
320 cedilla | , | ,s -> ,B:(B, ,t -> ,B~(B |
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 |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
327 ("~A" ?,BC(B) ("~a" ?,Bc(B) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
328 ("^A" ?,BB(B) ("^a" ?,Bb(B) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
329 ("^I" ?,BN(B) ("^i" ?,Bn(B) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
330 (",S" ?,B*(B) (",s" ?,B:(B) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
331 (",T" ?,B^(B) (",t" ?,B~(B) |
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 |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
336 "Alternative Romanian (rom,Bb(Bne,B:(Bte) input method with prefix modifiers |
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 ------------+--------+------------------ |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
340 tilde | \" | \"a -> ,Bb(B |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
341 circumflex | ' | 'a -> ,Bb(B, 'i -> ,Bn(B |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
342 cedilla | ' | 's -> ,B:(B, 't -> ,B~(B |
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 |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
348 ("'A" ?,BC(B) ("'a" ?,Bc(B) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
349 ("\"A" ?,BB(B) ("\"a" ?,Bb(B) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
350 ("'I" ?,BN(B) ("'i" ?,Bn(B) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
351 ("'S" ?,B*(B) ("'s" ?,B:(B) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
352 ("'T" ?,B^(B) ("'t" ?,B~(B) |
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: | |
52332
8cf1b5fea30b
("german-prefix"): Fix typo in the docstring.
Kenichi Handa <handa@m17n.org>
parents:
52246
diff
changeset
|
359 \"A -> ,AD(B -> \"O -> ,AV(B \"U -> ,A\(B \"s -> ,A_(B |
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 | |
363 ("\"A" ?,AD(B) | |
364 ("\"O" ?,AV(B) | |
365 ("\"U" ?,A\(B) | |
366 ("\"a" ?,Ad(B) | |
367 ("\"o" ?,Av(B) | |
368 ("\"u" ?,A|(B) | |
369 ("\"s" ?,A_(B) | |
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: | |
23470 | 377 'A -> ,AA(B 'E -> ,AI(B 'I -> ,AM(B 'O -> ,AS(B 'U -> ,AZ(B |
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 | |
381 ("'A" ?,AA(B) | |
382 ("'E" ?,AI(B) | |
383 ("'I" ?,AM(B) | |
384 ("'O" ?,AS(B) | |
385 ("'U" ?,AZ(B) | |
386 ("'a" ?,Aa(B) | |
387 ("'e" ?,Ai(B) | |
388 ("'i" ?,Am(B) | |
389 ("'o" ?,As(B) | |
390 ("'u" ?,Az(B) | |
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 ------------+--------+---------- | |
23470 | 400 acute | ' | 'a -> ,Aa(B '' -> ,A4(B |
18673 | 401 grave | ` | `a -> ,A`(B |
402 circumflex | ^ | ^a -> ,Ab(B | |
403 diaeresis | \" | \"u -> ,A|(B | |
404 tilde | ~ | ~a -> ,Ac(B | |
23470 | 405 cedilla | ' or , | 'c -> ,Ag(B ,c -> ,Ag(B |
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 | |
409 ("'A" ?,AA(B) | |
410 ("'E" ?,AI(B) | |
411 ("'I" ?,AM(B) | |
412 ("'O" ?,AS(B) | |
413 ("'U" ?,AZ(B) | |
414 ("'C" ?,AG(B) | |
415 ("'a" ?,Aa(B) | |
416 ("'e" ?,Ai(B) | |
417 ("'i" ?,Am(B) | |
418 ("'o" ?,As(B) | |
419 ("'u" ?,Az(B) | |
420 ("'c" ?,Ag(B) | |
421 ("' " ?') | |
422 ("`A" ?,A@(B) | |
423 ("`a" ?,A`(B) | |
424 ("` " ?`) | |
425 ("^A" ?,AB(B) | |
426 ("^E" ?,AJ(B) | |
427 ("^O" ?,AT(B) | |
428 ("^a" ?,Ab(B) | |
429 ("^e" ?,Aj(B) | |
430 ("^o" ?,At(B) | |
431 ("^ " ?^) | |
432 ("\"U" ?,A\(B) | |
433 ("\"u" ?,A|(B) | |
434 ("\" " ?\") | |
435 ("~A" ?,AC(B) | |
436 ("~O" ?,AU(B) | |
437 ("~a" ?,Ac(B) | |
438 ("~o" ?,Au(B) | |
439 ("~ " ?~) | |
440 (",c" ?,Ag(B) | |
441 (",C" ?,AG(B) | |
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 |
18673 | 447 "Spanish (Espa,Aq(Bol) input method with prefix modifiers |
448 | |
449 effect | prefix | examples | |
450 ------------+--------+---------- | |
451 acute | ' | 'a -> ,Aa(B | |
452 diaeresis | \" | \"u -> ,A|(B | |
453 tilde | ~ | ~n -> ,Aq(B | |
23470 | 454 symbol | ~ | ~> -> ,A;(B ~< -> ,A+(B ~! -> ,A!(B ~? -> ,A?(B |
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 | |
458 ("'A" ?,AA(B) | |
459 ("'E" ?,AI(B) | |
460 ("'I" ?,AM(B) | |
461 ("'O" ?,AS(B) | |
462 ("'U" ?,AZ(B) | |
463 ("'a" ?,Aa(B) | |
464 ("'e" ?,Ai(B) | |
465 ("'i" ?,Am(B) | |
466 ("'o" ?,As(B) | |
467 ("'u" ?,Az(B) | |
468 ("' " ?') | |
469 ("\"U" ?,A\(B) | |
470 ("\"u" ?,A|(B) | |
471 ("\" " ?\") | |
472 ("~N" ?,AQ(B) | |
473 ("~n" ?,Aq(B) | |
474 ("~>" ?\,A;(B) | |
475 ("~<" ?\,A+(B) | |
476 ("~!" ?,A!(B) | |
477 ("~?" ?,A?(B) | |
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 ------------+--------+---------- | |
23470 | 487 acute | ' | 'a -> ,Ba(B '' -> ?,B4(B |
18673 | 488 circumflex | ^ | ^a -> ,Bb(B |
23470 | 489 diaeresis | \" | \"a -> ,Bd(B \"\" -> ,B((B |
18673 | 490 breve | ~ | ~a -> ,Bc(B |
491 caron | ~ | ~c -> ,Bh(B | |
23470 | 492 cedilla | ` | `c -> ,Bg(B `e -> ?,Bj(B |
493 misc | ' ` ~ | 'd -> ,Bp(B `l -> ,B3(B `z -> ,B?(B ~o -> ,Bu(B ~u -> ,B{(B | |
494 symbol | ~ | `. -> ,B(B ~~ -> ,B"(B ~. -> ?,B8(B | |
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 | |
498 ("'A" ?,BA(B) | |
499 ("'C" ?,BF(B) | |
500 ("'D" ?,BP(B) | |
501 ("'E" ?,BI(B) | |
502 ("'I" ?,BM(B) | |
503 ("'L" ?,BE(B) | |
504 ("'N" ?,BQ(B) | |
505 ("'O" ?,BS(B) | |
506 ("'R" ?,B@(B) | |
507 ("'S" ?,B&(B) | |
508 ("'U" ?,BZ(B) | |
509 ("'Y" ?,B](B) | |
510 ("'Z" ?,B,(B) | |
511 ("'a" ?,Ba(B) | |
512 ("'c" ?,Bf(B) | |
513 ("'d" ?,Bp(B) | |
514 ("'e" ?,Bi(B) | |
515 ("'i" ?,Bm(B) | |
516 ("'l" ?,Be(B) | |
517 ("'n" ?,Bq(B) | |
518 ("'o" ?,Bs(B) | |
519 ("'r" ?,B`(B) | |
520 ("'s" ?,B6(B) | |
521 ("'u" ?,Bz(B) | |
522 ("'y" ?,B}(B) | |
523 ("'z" ?,B<(B) | |
524 ("''" ?,B4(B) | |
525 ("' " ?') | |
526 ("`A" ?,B!(B) | |
527 ("`C" ?,BG(B) | |
528 ("`E" ?,BJ(B) | |
529 ("`L" ?,B#(B) | |
530 ("`S" ?,B*(B) | |
531 ("`T" ?,B^(B) | |
532 ("`Z" ?,B/(B) | |
533 ("`a" ?,B1(B) | |
534 ("`l" ?,B3(B) | |
535 ("`c" ?,Bg(B) | |
536 ("`e" ?,Bj(B) | |
537 ("`s" ?,B:(B) | |
538 ("`t" ?,B~(B) | |
539 ("`z" ?,B?(B) | |
540 ("``" ?,B*(B) | |
541 ("`." ?,B(B) | |
542 ("` " ?`) | |
543 ("^A" ?,BB(B) | |
544 ("^I" ?,BN(B) | |
545 ("^O" ?,BT(B) | |
546 ("^a" ?,Bb(B) | |
547 ("^i" ?,Bn(B) | |
548 ("^o" ?,Bt(B) | |
549 ("^^" ?^) | |
550 ("^ " ?^) | |
551 ("\"A" ?,BD(B) | |
552 ("\"E" ?,BK(B) | |
553 ("\"O" ?,BV(B) | |
554 ("\"U" ?,B\(B) | |
555 ("\"a" ?,Bd(B) | |
556 ("\"e" ?,Bk(B) | |
557 ("\"o" ?,Bv(B) | |
558 ("\"s" ?,B_(B) | |
559 ("\"u" ?,B|(B) | |
560 ("\"\"" ?,B((B) | |
561 ("\" " ?\") | |
562 ("~A" ?,BC(B) | |
563 ("~C" ?,BH(B) | |
564 ("~D" ?,BO(B) | |
43022
511f905ddfe1
(latin-2-prefix): Add ?and ?From "Dr. Eduard Werner" <edi.werner@gmx.de>.
Pavel Janík <Pavel@Janik.cz>
parents:
42023
diff
changeset
|
565 ("~E" ?,BL(B) |
18673 | 566 ("~L" ?,B%(B) |
567 ("~N" ?,BR(B) | |
568 ("~O" ?,BU(B) | |
569 ("~R" ?,BX(B) | |
570 ("~S" ?,B)(B) | |
571 ("~T" ?,B+(B) | |
572 ("~U" ?,B[(B) | |
573 ("~Z" ?,B.(B) | |
574 ("~a" ?,Bc(B) | |
575 ("~c" ?,Bh(B) | |
576 ("~d" ?,Bo(B) | |
43022
511f905ddfe1
(latin-2-prefix): Add ?and ?From "Dr. Eduard Werner" <edi.werner@gmx.de>.
Pavel Janík <Pavel@Janik.cz>
parents:
42023
diff
changeset
|
577 ("~e" ?,Bl(B) |
18673 | 578 ("~l" ?,B5(B) |
579 ("~n" ?,Br(B) | |
580 ("~o" ?,Bu(B) | |
581 ("~r" ?,Bx(B) | |
582 ("~s" ?,B9(B) | |
583 ("~t" ?,B;(B) | |
584 ("~u" ?,B{(B) | |
585 ("~z" ?,B>(B) | |
586 ("~v" ?,B"(B) | |
587 ("~~" ?,B"(B) | |
588 ("~." ?,B8(B) | |
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 ------------+--------+---------- | |
23470 | 598 acute | ' | 'a -> ,Ca(B '' -> ?,C4(B |
18673 | 599 grave | ` | `a -> ,C`(B |
600 circumflex | ^ | ^a -> ,Cb(B | |
23470 | 601 diaeresis | \" | \"a -> ,Cd(B \"\" -> ,C((B |
602 cedilla | ~ | ~c -> ,Cg(B ~s -> ,C:(B ~~ -> ,C8(B | |
46664 | 603 dot above | / . | /g -> ,Cu(B .o -> ,Cu(B |
23470 | 604 misc | \" ~ / | \"s -> ,C_(B ~g -> ,C;(B ~u -> ,C}(B /h -> ,C1(B /i -> ,C9(B |
605 symbol | ~ | ~` -> ,C"(B /# -> ,C#(B /$ -> ,C$(B // -> ,C0(B | |
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 | |
609 ("'A" ?,CA(B) | |
610 ("'E" ?,CI(B) | |
611 ("'I" ?,CM(B) | |
612 ("'O" ?,CS(B) | |
613 ("'U" ?,CZ(B) | |
614 ("'a" ?,Ca(B) | |
615 ("'e" ?,Ci(B) | |
616 ("'i" ?,Cm(B) | |
617 ("'o" ?,Cs(B) | |
618 ("'u" ?,Cz(B) | |
619 ("''" ?,C4(B) | |
620 ("' " ?') | |
621 ("`A" ?,C@(B) | |
622 ("`E" ?,CH(B) | |
623 ("`I" ?,CL(B) | |
624 ("`O" ?,CR(B) | |
625 ("`U" ?,CY(B) | |
626 ("`a" ?,C`(B) | |
627 ("`e" ?,Ch(B) | |
628 ("`i" ?,Cl(B) | |
629 ("`o" ?,Cr(B) | |
630 ("`u" ?,Cy(B) | |
631 ("``" ?`) | |
632 ("` " ?`) | |
633 ("^A" ?,CB(B) | |
634 ("^C" ?,CF(B) | |
635 ("^E" ?,CJ(B) | |
636 ("^G" ?,CX(B) | |
637 ("^H" ?,C&(B) | |
638 ("^I" ?,CN(B) | |
639 ("^J" ?,C,(B) | |
640 ("^O" ?,CT(B) | |
641 ("^S" ?,C^(B) | |
642 ("^U" ?,C[(B) | |
643 ("^a" ?,Cb(B) | |
644 ("^c" ?,Cf(B) | |
645 ("^e" ?,Cj(B) | |
646 ("^g" ?,Cx(B) | |
647 ("^h" ?,C6(B) | |
648 ("^i" ?,Cn(B) | |
649 ("^j" ?,C<(B) | |
650 ("^o" ?,Ct(B) | |
651 ("^s" ?,C~(B) | |
652 ("^u" ?,C{(B) | |
653 ("^^" ?^) | |
654 ("^ " ?^) | |
655 ("\"A" ?,CD(B) | |
656 ("\"E" ?,CK(B) | |
657 ("\"I" ?,CO(B) | |
658 ("\"O" ?,CV(B) | |
659 ("\"U" ?,C\(B) | |
660 ("\"a" ?,Cd(B) | |
661 ("\"e" ?,Ck(B) | |
662 ("\"i" ?,Co(B) | |
663 ("\"o" ?,Cv(B) | |
664 ("\"u" ?,C|(B) | |
665 ("\"s" ?,C_(B) | |
666 ("\"\"" ?,C((B) | |
667 ("\" " ?\") | |
668 ("~C" ?,CG(B) | |
669 ("~N" ?,CQ(B) | |
670 ("~c" ?,Cg(B) | |
671 ("~n" ?,Cq(B) | |
672 ("~S" ?,C*(B) | |
673 ("~s" ?,C:(B) | |
674 ("~G" ?,C+(B) | |
675 ("~g" ?,C;(B) | |
676 ("~U" ?,C](B) | |
677 ("~u" ?,C}(B) | |
678 ("~`" ?,C"(B) | |
679 ("~~" ?,C8(B) | |
680 ("~ " ?~) | |
681 ("/C" ?,CE(B) | |
682 ("/G" ?,CU(B) | |
683 ("/H" ?,C!(B) | |
684 ("/I" ?,C)(B) | |
685 ("/Z" ?,C/(B) | |
686 ("/c" ?,Ce(B) | |
687 ("/g" ?,Cu(B) | |
688 ("/h" ?,C1(B) | |
689 ("/i" ?,C9(B) | |
690 ("/z" ?,C?(B) | |
691 ("/." ?,C(B) | |
692 ("/#" ?,C#(B) | |
693 ("/$" ?,C$(B) | |
694 ("//" ?,C0(B) | |
695 ("/ " ?/) | |
696 (".C" ?,CE(B) | |
697 (".G" ?,CU(B) | |
698 (".I" ?,C)(B) | |
699 (".Z" ?,C/(B) | |
700 (".c" ?,Ce(B) | |
701 (".g" ?,Cu(B) | |
702 (".z" ?,C?(B) | |
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 ("//" ?/) |
28434
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
714 ("/a" ?,B1(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
715 ("/c" ?,Bf(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
716 ("/e" ?,Bj(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
717 ("/l" ?,B3(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
718 ("/n" ?,Bq(B) |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
719 ("/o" ?,Bs(B) |
28434
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
720 ("/s" ?,B6(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
721 ("/x" ?,B<(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
722 ("/z" ?,B?(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
723 ("/A" ?,B!(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
724 ("/C" ?,BF(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
725 ("/E" ?,BJ(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
726 ("/L" ?,B#(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
727 ("/N" ?,BQ(B) |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
728 ("/O" ?,BS(B) |
28434
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
729 ("/S" ?,B&(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
730 ("/X" ?,B,(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
731 ("/Z" ?,B/(B)) |
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 ------------+--------+---------- |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
739 acute | ' | 'a -> ,ba(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
740 grave | ` | `a -> ,b`(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
741 circumflex | ^ | ^a -> ,bb(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
742 diaeresis | \" | \"a -> ,bd(B, \"Y -> ,b>(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
743 tilde | ~ | ~a -> ,bc(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
744 caron | ~ | ~z -> ,b8(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
745 cedilla | ~ | ~c -> ,bg(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
746 misc | \" ~ / | \"s -> ,b_(B ~d -> ,bp(B ~t -> ,b~(B /a -> ,be(B /e -> ,bf(B /o -> ,bx(B |
34694 | 747 | \" ~ / | /o -> ,b=(B |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
748 symbol | ~ | ~> -> ,b;(B ~< -> ,b+(B ~! -> ,b!(B ~? -> ,b?(B ~~ -> ,b8(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
749 | ~ | ~s -> ,b'(B ~e -> ,b$(B ~. -> ,b7(B ~$ -> ,b#(B ~u -> ,b5(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
750 | ~ | ~- -> ,b-(B ~= -> ,b/(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
751 symbol | _ / | _o -> ,b:(B _a -> ,b*(B // -> ,b0(B /\\ -> ,bW(B _y -> ,b%(B |
34694 | 752 | _ / | _: -> ,bw(B /c -> ,b"(B ~p -> ,b6(B |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
753 | _ / | /= -> ,b,(B |
34694 | 754 symbol | ^ | ^r -> ,b.(B ^c -> ,b)(B ^1 -> ,b9(B ^2 -> ,b2(B ^3 -> ,b3(B _a -> ,b*(B |
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 |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
758 ("'A" ?,bA(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
759 ("'E" ?,bI(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
760 ("'I" ?,bM(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
761 ("'O" ?,bS(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
762 ("'U" ?,bZ(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
763 ("'Y" ?,b](B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
764 ("'a" ?,ba(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
765 ("'e" ?,bi(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
766 ("'i" ?,bm(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
767 ("'o" ?,bs(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
768 ("'u" ?,bz(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
769 ("'y" ?,b}(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
770 ("' " ?') |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
771 ("`A" ?,b@(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
772 ("`E" ?,bH(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
773 ("`I" ?,bL(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
774 ("`O" ?,bR(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
775 ("`U" ?,bY(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
776 ("`a" ?,b`(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
777 ("`e" ?,bh(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
778 ("`i" ?,bl(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
779 ("`o" ?,br(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
780 ("`u" ?,by(B) |
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 ("` " ?`) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
783 ("^A" ?,bB(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
784 ("^E" ?,bJ(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
785 ("^I" ?,bN(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
786 ("^O" ?,bT(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
787 ("^U" ?,b[(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
788 ("^a" ?,bb(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
789 ("^e" ?,bj(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
790 ("^i" ?,bn(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
791 ("^o" ?,bt(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
792 ("^u" ?,b{(B) |
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 ("^ " ?^) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
795 ("\"A" ?,bD(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
796 ("\"E" ?,bK(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
797 ("\"I" ?,bO(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
798 ("\"O" ?,bV(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
799 ("\"U" ?,b\(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
800 ("\"a" ?,bd(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
801 ("\"e" ?,bk(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
802 ("\"i" ?,bo(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
803 ("\"o" ?,bv(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
804 ("\"s" ?,b_(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
805 ("\"u" ?,b|(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
806 ("\"y" ?,b(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
807 ("\" " ?\") |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
808 ("~A" ?,bC(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
809 ("~C" ?,bG(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
810 ("~D" ?,bP(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
811 ("~N" ?,bQ(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
812 ("~O" ?,bU(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
813 ("~S" ?,b&(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
814 ("~T" ?,b^(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
815 ("~Z" ?,b4(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
816 ("~a" ?,bc(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
817 ("~c" ?,bg(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
818 ("~d" ?,bp(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
819 ("~n" ?,bq(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
820 ("~o" ?,bu(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
821 ("~s" ?,b((B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
822 ("~t" ?,b~(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
823 ("~z" ?,b8(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
824 ("~>" ?\,b;(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
825 ("~<" ?\,b+(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
826 ("~!" ?,b!(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
827 ("~?" ?,b?(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
828 ("~ " ?~) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
829 ("/A" ?,bE(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
830 ("/E" ?,bF(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
831 ("/O" ?,bX(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
832 ("/a" ?,be(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
833 ("/e" ?,bf(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
834 ("/o" ?,bx(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
835 ("//" ?,b0(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
836 ("/ " ?/) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
837 ("_o" ?,b:(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
838 ("_a" ?,b*(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
839 ("_+" ?,b1(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
840 ("_y" ?,b%(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
841 ("_:" ?,bw(B) |
60516
fb4694e71d60
("latin-1-prefix"): Add rule "__"->"_".
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
842 ("_ " ?,b (B) |
fb4694e71d60
("latin-1-prefix"): Add rule "__"->"_".
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
843 ("__" ?_) |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
844 ("/c" ?,b"(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
845 ("/\\" ?,bW(B) |
34694 | 846 ("/o" ?,b=(B) ; clash with ,bx(B, but ,bf(B uses / |
847 ("/O" ?,b<(B) | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
848 ("\"Y" ?,b>(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
849 ("~s" ?,b'(B) |
34694 | 850 ("~p" ?,b6(B) |
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? |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
852 ("~e" ?,b$(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
853 ("~." ?,b7(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
854 ("~$" ?,b#(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
855 ("~u" ?,b5(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
856 ("^r" ?,b.(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
857 ("^c" ?,b)(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
858 ("^1" ?,b9(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
859 ("^2" ?,b2(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
860 ("^3" ?,b3(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
861 ("~-" ?,b-(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
862 ("~=" ?,b/(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
863 ("/=" ?,b,(B)) |
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 ------------+--------+---------- |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
874 acute | ' | 'a -> ,_a(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
875 grave | ` | `a -> ,_`(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
876 circumflex | ^ | ^w -> ,_p(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
877 diaeresis | \" | \"a -> ,_d(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
878 dot above | . | .b -> ,_"(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
879 tilde | ~ | ~a -> ,_c(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
880 cedilla | ~ | ~c -> ,_g(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
881 misc | \" ~ / | \"s -> ,__(B /a -> ,_e(B /e -> ,_f(B /o -> ,_x(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
882 | ~ | ~s -> ,_'(B ~$ -> ,_#(B ~p -> ,_6(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
883 symbol | ^ | ^r -> ,_.(B ^c -> ,_)(B |
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 |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
888 (".B" ?,_!(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
889 (".b" ?,_"(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
890 (".c" ?,_%(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
891 (".C" ?,_$(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
892 (".D" ?,_&(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
893 (".d" ?,_+(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
894 (".f" ?,_1(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
895 (".F" ?,_0(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
896 (".g" ?,_3(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
897 (".G" ?,_2(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
898 (".m" ?,_5(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
899 (".M" ?,_4(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
900 (".p" ?,_9(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
901 (".P" ?,_7(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
902 (".s" ?,_?(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
903 (".S" ?,_;(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
904 (".t" ?,_w(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
905 (".T" ?,_W(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
906 ("'A" ?,_A(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
907 ("'E" ?,_I(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
908 ("'I" ?,_M(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
909 ("'O" ?,_S(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
910 ("'U" ?,_Z(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
911 ("'Y" ?,_](B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
912 ("'W" ?,_*(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
913 ("'a" ?,_a(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
914 ("'e" ?,_i(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
915 ("'i" ?,_m(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
916 ("'o" ?,_s(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
917 ("'u" ?,_z(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
918 ("'w" ?,_:(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
919 ("'y" ?,_}(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
920 ("' " ?') |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
921 ("`A" ?,_@(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
922 ("`E" ?,_H(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
923 ("`I" ?,_L(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
924 ("`O" ?,_R(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
925 ("`U" ?,_Y(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
926 ("`W" ?,_((B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
927 ("`Y" ?,_,(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
928 ("`a" ?,_`(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
929 ("`e" ?,_h(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
930 ("`i" ?,_l(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
931 ("`o" ?,_r(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
932 ("`u" ?,_y(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
933 ("`w" ?,_8(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
934 ("`y" ?,_<(B) |
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 ("` " ?`) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
937 ("^A" ?,_B(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
938 ("^E" ?,_J(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
939 ("^I" ?,_N(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
940 ("^O" ?,_T(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
941 ("^U" ?,_[(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
942 ("^a" ?,_b(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
943 ("^e" ?,_j(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
944 ("^i" ?,_n(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
945 ("^o" ?,_t(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
946 ("^u" ?,_{(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
947 ("^w" ?,_p(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
948 ("^W" ?,_P(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
949 ("^y" ?,_~(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
950 ("^Y" ?,_^(B) |
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 ("^ " ?^) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
953 ("\"A" ?,_D(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
954 ("\"E" ?,_K(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
955 ("\"I" ?,_O(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
956 ("\"O" ?,_V(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
957 ("\"U" ?,_\(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
958 ("\"a" ?,_d(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
959 ("\"e" ?,_k(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
960 ("\"i" ?,_o(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
961 ("\"o" ?,_v(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
962 ("\"s" ?,__(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
963 ("\"u" ?,_|(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
964 ("\"w" ?,_>(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
965 ("\"W" ?,_=(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
966 ("\"y" ?,_(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
967 ("\"Y" ?,_/(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
968 ("\" " ?\") |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
969 ("~A" ?,_C(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
970 ("~C" ?,_G(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
971 ("~N" ?,_Q(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
972 ("~O" ?,_U(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
973 ("~a" ?,_c(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
974 ("~c" ?,_g(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
975 ("~n" ?,_q(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
976 ("~o" ?,_u(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
977 ("~ " ?~) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
978 ("/A" ?,_E(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
979 ("/E" ?,_F(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
980 ("/O" ?,_X(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
981 ("/a" ?,_e(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
982 ("/e" ?,_f(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
983 ("/o" ?,_x(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
984 ("/ " ?/) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
985 ("~p" ?,_6(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
986 ("~s" ?,_'(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
987 ("~$" ?,_#(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
988 ("^r" ?,_.(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
989 ("^c" ?,_)(B)) |
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 ------------+--------+---------- | |
999 acute | ' | 'a -> ,Aa(B, '' -> ,A4(B | |
1000 grave | ` | `a -> ,A`(B | |
1001 circumflex | ^ | ^a -> ,Ab(B | |
1002 diaeresis | \" | \"a -> ,Ad(B \"\" -> ,A((B | |
1003 tilde | ~ | ~a -> ,Ac(B | |
1004 cedilla | ~ | ~c -> ,Ag(B | |
1005 breve | ~ | ~a -> $,1 #(B | |
1006 caron | ~ | ~c -> $,1 -(B | |
1007 dot above | ~ / . | ~o -> $,1 A(B /o -> $,1 A(B .o -> $,1 A(B | |
1008 misc | \" ~ / | \"s -> ,A_(B ~d -> ,Ap(B ~t -> ,A~(B /a -> ,Ae(B /e -> ,Af(B /o -> ,Ax(B | |
1009 symbol | ~ | ~> -> ,A;(B ~< -> ,A+(B ~! -> ,A!(B ~? -> ,A?(B ~~ -> ,A8(B | |
1010 symbol | _ / | _o -> ,A:(B _a -> ,A*(B // -> ,A0(B /\\ -> ,AW(B _y -> ,A%(B | |
1011 symbol | ^ | ^r -> ,A.(B ^c -> ,A)(B ^1 -> ,A9(B ^2 -> ,A2(B ^3 -> ,A3(B | |
1012 " nil t nil nil nil nil nil nil nil nil t) | |
1013 | |
1014 (quail-define-rules | |
1015 ("' " ?') | |
1016 ("''" ?,A4(B) | |
1017 ("'A" ?,AA(B) | |
1018 ("'E" ?,AI(B) | |
1019 ("'I" ?,AM(B) | |
1020 ("'O" ?,AS(B) | |
1021 ("'U" ?,AZ(B) | |
1022 ("'W" ?$,1nb(B) | |
1023 ("'Y" ?,A](B) | |
1024 ("'a" ?,Aa(B) | |
1025 ("'e" ?,Ai(B) | |
1026 ("'i" ?,Am(B) | |
1027 ("'o" ?,As(B) | |
1028 ("'u" ?,Az(B) | |
1029 ("'w" ?$,1nc(B) | |
1030 ("'y" ?,A}(B) | |
1031 (".B" ?$,1mB(B) | |
1032 (".C" ?$,1 *(B) | |
1033 (".D" ?$,1mJ(B) | |
1034 (".F" ?$,1m^(B) | |
1035 (".G" ?$,1 @(B) | |
1036 (".I" ?$,1 P(B) | |
1037 (".M" ?$,1n (B) | |
1038 (".P" ?$,1n6(B) | |
1039 (".S" ?$,1n@(B) | |
1040 (".T" ?$,1nJ(B) | |
1041 (".Z" ?$,1!;(B) | |
1042 (".b" ?$,1mC(B) | |
1043 (".c" ?$,1 +(B) | |
1044 (".d" ?$,1mK(B) | |
1045 (".f" ?$,1m_(B) | |
1046 (".g" ?$,1 A(B) | |
1047 (".m" ?$,1n!(B) | |
1048 (".p" ?$,1n7(B) | |
1049 (".s" ?$,1nA(B) | |
1050 (".t" ?$,1nK(B) | |
1051 (".z" ?$,1!<(B) | |
1052 ("/ " ?/) | |
1053 ("/#" ?,A#(B) | |
1054 ("/$" ?,A$(B) | |
1055 ("/." ?$,1$y(B) | |
1056 ("//" ?,A0(B) | |
1057 ("/2" ?,A=(B) | |
1058 ("/3" ?,A>(B) | |
1059 ("/4" ?,A<(B) | |
1060 ("/=" ?,A,(B) | |
1061 ("/A" ?,AE(B) | |
1062 ("/C" ?$,1 *(B) | |
1063 ("/E" ?,AF(B) | |
1064 ("/G" ?$,1 @(B) | |
1065 ("/H" ?$,1 F(B) | |
1066 ("/I" ?$,1 P(B) | |
1067 ("/O" ?,AX(B) | |
1068 ("/O" ?$,1 r(B) | |
1069 ("/Z" ?$,1!;(B) | |
1070 ("/\\" ?,AW(B) | |
1071 ("/a" ?,Ae(B) | |
1072 ("/c" ?,A"(B) | |
1073 ("/c" ?$,1 +(B) | |
1074 ("/e" ?,Af(B) | |
1075 ("/g" ?$,1 A(B) | |
1076 ("/h" ?$,1 G(B) | |
1077 ("/i" ?$,1 Q(B) | |
1078 ("/o" ?,Ax(B) | |
1079 ("/o" ?$,1 s(B) | |
1080 ("/z" ?$,1!<(B) | |
1081 ("\" " ?\") | |
1082 ("\"A" ?,AD(B) | |
1083 ("\"E" ?,AK(B) | |
1084 ("\"I" ?,AO(B) | |
1085 ("\"O" ?,AV(B) | |
1086 ("\"U" ?,A\(B) | |
1087 ("\"W" ?$,1nd(B) | |
1088 ("\"Y" ?$,1!8(B) | |
1089 ("\"\"" ?,A((B) | |
1090 ("\"a" ?,Ad(B) | |
1091 ("\"e" ?,Ak(B) | |
1092 ("\"i" ?,Ao(B) | |
1093 ("\"o" ?,Av(B) | |
1094 ("\"s" ?,A_(B) | |
1095 ("\"u" ?,A|(B) | |
1096 ("\"w" ?$,1ne(B) | |
1097 ("\"y" ?,A(B) | |
1098 ("^ " ?^) | |
1099 ("^1" ?,A9(B) | |
1100 ("^2" ?,A2(B) | |
1101 ("^3" ?,A3(B) | |
1102 ("^A" ?,AB(B) | |
1103 ("^C" ?$,1 ((B) | |
1104 ("^E" ?,AJ(B) | |
1105 ("^G" ?$,1 <(B) | |
1106 ("^H" ?$,1 D(B) | |
1107 ("^I" ?,AN(B) | |
1108 ("^J" ?$,1 T(B) | |
1109 ("^O" ?,AT(B) | |
1110 ("^S" ?$,1 |(B) | |
1111 ("^U" ?,A[(B) | |
1112 ("^W" ?$,1!4(B) | |
1113 ("^Y" ?$,1!6(B) | |
1114 ("^^" ?^) | |
1115 ("^a" ?,Ab(B) | |
1116 ("^c" ?,A)(B) | |
1117 ("^c" ?$,1 )(B) | |
1118 ("^e" ?,Aj(B) | |
1119 ("^g" ?$,1 =(B) | |
1120 ("^h" ?$,1 E(B) | |
1121 ("^i" ?,An(B) | |
1122 ("^j" ?$,1 U(B) | |
1123 ("^o" ?,At(B) | |
1124 ("^r" ?,A.(B) | |
1125 ("^s" ?$,1 }(B) | |
1126 ("^u" ?,A{(B) | |
1127 ("^w" ?$,1!5(B) | |
1128 ("^y" ?$,1!7(B) | |
1129 ("_+" ?,A1(B) | |
1130 ("_:" ?,Aw(B) | |
1131 ("_a" ?,A*(B) | |
1132 ("_o" ?,A:(B) | |
1133 ("_y" ?,A%(B) | |
1134 ("_ " ?,A (B) | |
1135 ("` " ?`) | |
1136 ("`A" ?,A@(B) | |
1137 ("`E" ?,AH(B) | |
1138 ("`I" ?,AL(B) | |
1139 ("`O" ?,AR(B) | |
1140 ("`U" ?,AY(B) | |
1141 ("`W" ?$,1n`(B) | |
1142 ("`Y" ?$,1or(B) | |
1143 ("``" ?`) | |
1144 ("`a" ?,A`(B) | |
1145 ("`e" ?,Ah(B) | |
1146 ("`i" ?,Al(B) | |
1147 ("`o" ?,Ar(B) | |
1148 ("`u" ?,Ay(B) | |
1149 ("`w" ?$,1na(B) | |
1150 ("`y" ?$,1os(B) | |
1151 ("~ " ?~) | |
1152 ("~!" ?,A!(B) | |
1153 ("~$" ?,A#(B) | |
1154 ("~-" ?,A-(B) | |
1155 ("~." ?,A7(B) | |
1156 ("~<" ?\,A+(B) | |
1157 ("~=" ?,A/(B) | |
1158 ("~>" ?\,A;(B) | |
1159 ("~?" ?,A?(B) | |
1160 ("~A" ?,AC(B) | |
1161 ("~C" ?,AG(B) | |
1162 ("~D" ?,AP(B) | |
1163 ("~G" ?$,1 >(B) | |
1164 ("~N" ?,AQ(B) | |
1165 ("~O" ?,AU(B) | |
1166 ("~O" ?$,1 @(B) | |
1167 ("~S" ?$,1 ~(B) | |
1168 ("~S" ?$,1! (B) | |
1169 ("~T" ?,A^(B) | |
1170 ("~U" ?$,1!,(B) | |
1171 ("~Z" ?$,1!=(B) | |
1172 ("~`" ?$,1$x(B) | |
1173 ("~a" ?,Ac(B) | |
1174 ("~c" ?,Ag(B) | |
1175 ("~d" ?,Ap(B) | |
1176 ("~e" ?$,1tL(B) | |
1177 ("~g" ?$,1 ?(B) | |
1178 ("~n" ?,Aq(B) | |
1179 ("~o" ?,Au(B) | |
1180 ("~o" ?$,1 A(B) | |
1181 ("~p" ?,A6(B) | |
1182 ("~s" ?,A'(B) | |
1183 ("~s" ?$,1 (B) | |
1184 ("~s" ?$,1!!(B) | |
1185 ("~t" ?,A~(B) | |
1186 ("~u" ?,A5(B) | |
1187 ("~u" ?$,1!-(B) | |
1188 ("~x" ?,A$(B) | |
1189 ("~z" ?$,1!>(B) | |
1190 ("~|" ?,A&(B) | |
1191 ("~~" ?,A8(B) | |
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 |