Mercurial > emacs
annotate leim/quail/latin-pre.el @ 66418:78ad7c173e94
*** empty log message ***
author | Nick Roberts <nickrob@snap.net.nz> |
---|---|
date | Tue, 25 Oct 2005 02:21:28 +0000 |
parents | 23a17af379b1 |
children | b94a4bf1aca6 f9a65d7ebd29 |
rev | line source |
---|---|
40708 | 1 ;;; latin-pre.el --- Quail packages for inputting various European characters -*-coding: iso-2022-7bit;-*- |
18673 | 2 |
3 ;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN. | |
4 ;; Licensed to the Free Software Foundation. | |
47412 | 5 ;; Copyright (C) 2000, 2002 Free Software Foundation, Inc. |
18673 | 6 |
7 ;; Keywords: mule, multilingual, latin, input method | |
8 | |
9 ;; This file is part of GNU Emacs. | |
10 | |
11 ;; GNU Emacs is free software; you can redistribute it and/or modify | |
12 ;; it under the terms of the GNU General Public License as published by | |
13 ;; the Free Software Foundation; either version 2, or (at your option) | |
14 ;; any later version. | |
15 | |
16 ;; GNU Emacs is distributed in the hope that it will be useful, | |
17 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
18 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
19 ;; GNU General Public License for more details. | |
20 | |
21 ;; You should have received a copy of the GNU General Public License | |
22 ;; along with GNU Emacs; see the file COPYING. If not, write to the | |
64083 | 23 ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
24 ;; Boston, MA 02110-1301, USA. | |
18673 | 25 |
26 ;;; Commentary: | |
27 | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
28 ;; Key translation maps were originally copied from iso-acc.el. |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
29 ;; 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
|
30 ;; 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
|
31 ;; by R.F. Smith <rsmith@xs4all.nl> |
28434
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
32 ;; |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
33 ;; polish-slash: |
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
34694
diff
changeset
|
34 ;; 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
|
35 ;; 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
|
36 ;; |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
37 ;; latin-[89]-prefix: Dave Love <fx@gnu.org> |
18673 | 38 |
46664 | 39 ;; You might make extra input sequences on the basis of the X |
40 ;; locale/*/Compose files (which have both prefix and postfix | |
41 ;; sequences), but bear in mind that sequences which are logical in | |
42 ;; that context may not be sensible when they're not signalled with | |
43 ;; the Compose key. An example is a double space for NBSP. | |
44 | |
18673 | 45 ;;; Code: |
46 | |
47 (require 'quail) | |
48 | |
49 (quail-define-package | |
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
50 "latin-1-prefix" "Latin-1" "1>" t |
18673 | 51 "Latin-1 characters input method with prefix modifiers |
52 | |
53 effect | prefix | examples | |
54 ------------+--------+---------- | |
55 acute | ' | 'a -> ,Aa(B, '' -> ,A4(B | |
56 grave | ` | `a -> ,A`(B | |
57 circumflex | ^ | ^a -> ,Ab(B | |
27940
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
58 diaeresis | \" | \"a -> ,Ad(B \"\" -> ,A((B |
18673 | 59 tilde | ~ | ~a -> ,Ac(B |
60 cedilla | ~ | ~c -> ,Ag(B | |
27940
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
61 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
|
62 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
|
63 | ~ | ~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
|
64 | ~ | ~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
|
65 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
|
66 | _ / | _: -> ,Aw(B /c -> ,A"(B /2 -> ,A=(B /4 -> ,A<(B /3 -> ,A>(B |
46664 | 67 | _ / | /= -> ,A,(B |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
68 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
|
69 " nil t nil nil nil nil nil nil nil nil t) |
18673 | 70 |
71 (quail-define-rules | |
72 ("'A" ?,AA(B) | |
73 ("'E" ?,AI(B) | |
74 ("'I" ?,AM(B) | |
75 ("'O" ?,AS(B) | |
76 ("'U" ?,AZ(B) | |
77 ("'Y" ?,A](B) | |
78 ("'a" ?,Aa(B) | |
79 ("'e" ?,Ai(B) | |
80 ("'i" ?,Am(B) | |
81 ("'o" ?,As(B) | |
82 ("'u" ?,Az(B) | |
83 ("'y" ?,A}(B) | |
84 ("''" ?,A4(B) | |
85 ("' " ?') | |
86 ("`A" ?,A@(B) | |
87 ("`E" ?,AH(B) | |
88 ("`I" ?,AL(B) | |
89 ("`O" ?,AR(B) | |
90 ("`U" ?,AY(B) | |
91 ("`a" ?,A`(B) | |
92 ("`e" ?,Ah(B) | |
93 ("`i" ?,Al(B) | |
94 ("`o" ?,Ar(B) | |
95 ("`u" ?,Ay(B) | |
96 ("``" ?`) | |
97 ("` " ?`) | |
98 ("^A" ?,AB(B) | |
99 ("^E" ?,AJ(B) | |
100 ("^I" ?,AN(B) | |
101 ("^O" ?,AT(B) | |
102 ("^U" ?,A[(B) | |
103 ("^a" ?,Ab(B) | |
104 ("^e" ?,Aj(B) | |
105 ("^i" ?,An(B) | |
106 ("^o" ?,At(B) | |
107 ("^u" ?,A{(B) | |
108 ("^^" ?^) | |
109 ("^ " ?^) | |
110 ("\"A" ?,AD(B) | |
111 ("\"E" ?,AK(B) | |
112 ("\"I" ?,AO(B) | |
113 ("\"O" ?,AV(B) | |
114 ("\"U" ?,A\(B) | |
115 ("\"a" ?,Ad(B) | |
116 ("\"e" ?,Ak(B) | |
117 ("\"i" ?,Ao(B) | |
118 ("\"o" ?,Av(B) | |
119 ("\"s" ?,A_(B) | |
120 ("\"u" ?,A|(B) | |
121 ("\"y" ?,A(B) | |
122 ("\"\"" ?,A((B) | |
123 ("\" " ?\") | |
124 ("~A" ?,AC(B) | |
125 ("~C" ?,AG(B) | |
126 ("~D" ?,AP(B) | |
127 ("~N" ?,AQ(B) | |
128 ("~O" ?,AU(B) | |
129 ("~T" ?,A^(B) | |
130 ("~a" ?,Ac(B) | |
131 ("~c" ?,Ag(B) | |
132 ("~d" ?,Ap(B) | |
133 ("~n" ?,Aq(B) | |
134 ("~o" ?,Au(B) | |
135 ("~t" ?,A~(B) | |
136 ("~>" ?\,A;(B) | |
137 ("~<" ?\,A+(B) | |
138 ("~!" ?,A!(B) | |
139 ("~?" ?,A?(B) | |
140 ("~~" ?,A8(B) | |
141 ("~ " ?~) | |
142 ("/A" ?,AE(B) | |
143 ("/E" ?,AF(B) | |
144 ("/O" ?,AX(B) | |
145 ("/a" ?,Ae(B) | |
146 ("/e" ?,Af(B) | |
147 ("/o" ?,Ax(B) | |
148 ("//" ?,A0(B) | |
21221
cb6ab6de7548
("latin-1-prefix"): Fix the translation of
Kenichi Handa <handa@m17n.org>
parents:
19652
diff
changeset
|
149 ("/ " ?/) |
23470 | 150 ("_o" ?,A:(B) |
151 ("_a" ?,A*(B) | |
46664 | 152 ("_ " ?,A (B) |
27940
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
153 ;; 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
|
154 ("_+" ?,A1(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
155 ("_y" ?,A%(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
156 ("_:" ?,Aw(B) |
60516
fb4694e71d60
("latin-1-prefix"): Add rule "__"->"_".
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
157 ("__" ?_) |
27940
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
158 ("/c" ?,A"(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
159 ("/\\" ?,AW(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
160 ("/2" ?,A=(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
161 ("/4" ?,A<(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
162 ("/3" ?,A>(B) |
31134
00918609ef4a
("latin-1-prefix"): Change ~s to give ,A'(B and
Dave Love <fx@gnu.org>
parents:
28434
diff
changeset
|
163 ("~s" ?,A'(B) |
00918609ef4a
("latin-1-prefix"): Change ~s to give ,A'(B and
Dave Love <fx@gnu.org>
parents:
28434
diff
changeset
|
164 ("~p" ?,A6(B) |
27940
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
165 ("~x" ?,A$(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
166 ("~." ?,A7(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
167 ("~$" ?,A#(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
168 ("~u" ?,A5(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
169 ("^r" ?,A.(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
170 ("^c" ?,A)(B) |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
171 ("^1" ?,A9(B) |
27940
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
172 ("^2" ?,A2(B) |
ad4ce97753b4
("latin-1-prefix"): Add rules for symbols.
Kenichi Handa <handa@m17n.org>
parents:
26822
diff
changeset
|
173 ("^3" ?,A3(B) |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
174 ("~-" ?,A-(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
175 ("~|" ?,A&(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
176 ("/=" ?,A,(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
177 ("~=" ?,A/(B) |
18673 | 178 ) |
179 | |
180 (quail-define-package | |
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
181 "catalan-prefix" "Latin-1" "CA>" t |
18673 | 182 "Catalan and Spanish input method with prefix modifiers |
183 | |
184 effect | prefix | examples | |
185 ------------+--------+---------- | |
23470 | 186 acute | ' | 'a -> ,Aa(B '' -> ,A4(B |
18673 | 187 grave | ` | `a -> ,A`(B |
23470 | 188 diaeresis | \" | \"i -> ,Ao(B \"\" -> ,A((B |
18673 | 189 tilde | ~ | ~n -> ,Aq(B |
190 cedilla | ~ | ~c -> ,Ag(B | |
23470 | 191 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
|
192 " nil t nil nil nil nil nil nil nil nil t) |
18673 | 193 |
194 (quail-define-rules | |
195 ("'A" ?,AA(B) | |
196 ("'E" ?,AI(B) | |
197 ("'I" ?,AM(B) | |
198 ("'O" ?,AS(B) | |
199 ("'U" ?,AZ(B) | |
200 ("'a" ?,Aa(B) | |
201 ("'e" ?,Ai(B) | |
202 ("'i" ?,Am(B) | |
203 ("'o" ?,As(B) | |
204 ("'u" ?,Az(B) | |
205 ("' " ?') | |
206 ("`A" ?,A@(B) | |
207 ("`E" ?,AH(B) | |
208 ("`O" ?,AR(B) | |
209 ("`a" ?,A`(B) | |
210 ("`e" ?,Ah(B) | |
211 ("`o" ?,Ar(B) | |
212 ("` " ?`) | |
213 ("\"I" ?,AO(B) | |
214 ("\"U" ?,A\(B) | |
215 ("\"i" ?,Ao(B) | |
216 ("\"u" ?,A|(B) | |
217 ("\" " ?\") | |
218 ("~C" ?,AG(B) | |
219 ("~N" ?,AQ(B) | |
220 ("~c" ?,Ag(B) | |
221 ("~n" ?,Aq(B) | |
222 ("~>" ?\,A;(B) | |
223 ("~<" ?\,A+(B) | |
224 ("~!" ?,A!(B) | |
225 ("~?" ?,A?(B) | |
226 ("~ " ?~) | |
227 ) | |
228 | |
229 (quail-define-package | |
26822
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
230 "esperanto-prefix" "Latin-3" "EO>" t |
18673 | 231 "Esperanto input method with prefix modifiers |
232 Key translation rules are: | |
26822
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
233 ^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
|
234 ^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
|
235 " nil t nil nil nil nil nil nil nil nil t) |
18673 | 236 |
237 (quail-define-rules | |
26822
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
238 ("^H" ?,C&(B) |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
239 ("^J" ?,C,(B) |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
240 ("^h" ?,C6(B) |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
241 ("^j" ?,C<(B) |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
242 ("^C" ?,CF(B) |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
243 ("^G" ?,CX(B) |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
244 ("^S" ?,C^(B) |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
245 ("^c" ?,Cf(B) |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
246 ("^g" ?,Cx(B) |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
247 ("^s" ?,C~(B) |
18673 | 248 ("^^" ?^) |
249 ("^ " ?^) | |
26822
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
250 ("~U" ?,C](B) |
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
251 ("~u" ?,C}(B) |
18673 | 252 ("~ " ?~) |
253 ) | |
254 | |
255 (quail-define-package | |
42023
b8cca72f7c5f
("french-prefix", "german-prefix")
Dave Love <fx@gnu.org>
parents:
40708
diff
changeset
|
256 "french-prefix" "French" "FR>" t |
18673 | 257 "French (Fran,Ag(Bais) input method with prefix modifiers |
258 | |
259 effect | prefix | examples | |
260 ------------+--------+---------- | |
261 acute | ' | 'e -> ,Ai(B | |
262 grave | ` | `a -> ,A`(B | |
263 circumflex | ^ | ^a -> ,Ab(B | |
52246
dafe00f2eaab
("french-prefix"): Fix spacing in docstring.
Markus Rost <rost@math.uni-bielefeld.de>
parents:
50768
diff
changeset
|
264 diaeresis | \" | \"i -> ,Ao(B |
23470 | 265 cedilla | ~ or , | ~c -> ,Ag(B ,c -> ,Ag(B |
266 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
|
267 " nil t nil nil nil nil nil nil nil nil t) |
18673 | 268 |
269 (quail-define-rules | |
270 ("'E" ?,AI(B) | |
271 ("'C" ?,AG(B) | |
272 ("'e" ?,Ai(B) | |
273 ("'c" ?,Ag(B) | |
274 ("' " ?') | |
275 ("`A" ?,A@(B) | |
276 ("`E" ?,AH(B) | |
277 ("`U" ?,AY(B) | |
278 ("`a" ?,A`(B) | |
279 ("`e" ?,Ah(B) | |
280 ("`u" ?,Ay(B) | |
281 ("` " ?`) | |
282 ("^A" ?,AB(B) | |
283 ("^E" ?,AJ(B) | |
284 ("^I" ?,AN(B) | |
285 ("^O" ?,AT(B) | |
286 ("^U" ?,A[(B) | |
287 ("^a" ?,Ab(B) | |
288 ("^e" ?,Aj(B) | |
289 ("^i" ?,An(B) | |
290 ("^o" ?,At(B) | |
291 ("^u" ?,A{(B) | |
292 ("^ " ?^) | |
293 ("\"E" ?,AK(B) | |
294 ("\"I" ?,AO(B) | |
295 ("\"e" ?,Ak(B) | |
296 ("\"i" ?,Ao(B) | |
297 ("\" " ?\") | |
298 ("~<" ?\,A+(B) | |
299 ("~>" ?\,A;(B) | |
300 ("~C" ?,AG(B) | |
301 ("~c" ?,Ag(B) | |
43128
d7ccb71bc97c
(french-prefix): ", " => "," and "~ " => "~". Don't define "~," at all.
Richard M. Stallman <rms@gnu.org>
parents:
43022
diff
changeset
|
302 ("~ " ?~) |
18673 | 303 (",C" ?,AG(B) |
304 (",c" ?,Ag(B) | |
43128
d7ccb71bc97c
(french-prefix): ", " => "," and "~ " => "~". Don't define "~," at all.
Richard M. Stallman <rms@gnu.org>
parents:
43022
diff
changeset
|
305 (", " ?,) |
18673 | 306 ) |
307 | |
308 (quail-define-package | |
24705
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
309 "romanian-prefix" "Romanian" "RO>" t |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
310 "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
|
311 |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
312 effect | prefix | examples |
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 tilde | ~ | ~a -> ,Bc(B |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
315 circumflex | ^ | ^a -> ,Bb(B, ^i -> ,Bn(B |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
316 cedilla | , | ,s -> ,B:(B, ,t -> ,B~(B |
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 ^ | ^ | ^^ -> ^ |
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 " 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
|
321 |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
322 (quail-define-rules |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
323 ("~A" ?,BC(B) ("~a" ?,Bc(B) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
324 ("^A" ?,BB(B) ("^a" ?,Bb(B) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
325 ("^I" ?,BN(B) ("^i" ?,Bn(B) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
326 (",S" ?,B*(B) (",s" ?,B:(B) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
327 (",T" ?,B^(B) (",t" ?,B~(B) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
328 ("^^" ?^) ("~~" ?~) (",," ?,)) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
329 |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
330 (quail-define-package |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
331 "romanian-alt-prefix" "Romanian" "RO>" t |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
332 "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
|
333 |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
334 effect | prefix | examples |
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 tilde | \" | \"a -> ,Bb(B |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
337 circumflex | ' | 'a -> ,Bb(B, 'i -> ,Bn(B |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
338 cedilla | ' | 's -> ,B:(B, 't -> ,B~(B |
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 \" | \" | \"\" -> \" |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
341 " 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
|
342 |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
343 (quail-define-rules |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
344 ("'A" ?,BC(B) ("'a" ?,Bc(B) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
345 ("\"A" ?,BB(B) ("\"a" ?,Bb(B) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
346 ("'I" ?,BN(B) ("'i" ?,Bn(B) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
347 ("'S" ?,B*(B) ("'s" ?,B:(B) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
348 ("'T" ?,B^(B) ("'t" ?,B~(B) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
349 ("''" ?') ("\"\"" ?\")) |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
350 |
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
351 (quail-define-package |
42023
b8cca72f7c5f
("french-prefix", "german-prefix")
Dave Love <fx@gnu.org>
parents:
40708
diff
changeset
|
352 "german-prefix" "German" "DE>" t |
18673 | 353 "German (Deutsch) input method with prefix modifiers |
354 Key translation rules are: | |
52332
8cf1b5fea30b
("german-prefix"): Fix typo in the docstring.
Kenichi Handa <handa@m17n.org>
parents:
52246
diff
changeset
|
355 \"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
|
356 " nil t nil nil nil nil nil nil nil nil t) |
18673 | 357 |
358 (quail-define-rules | |
359 ("\"A" ?,AD(B) | |
360 ("\"O" ?,AV(B) | |
361 ("\"U" ?,A\(B) | |
362 ("\"a" ?,Ad(B) | |
363 ("\"o" ?,Av(B) | |
364 ("\"u" ?,A|(B) | |
365 ("\"s" ?,A_(B) | |
366 ("\" " ?\") | |
367 ) | |
368 | |
369 (quail-define-package | |
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
370 "irish-prefix" "Latin-1" "GA>" t |
18673 | 371 "Irish input method with prefix modifiers |
372 Key translation rules are: | |
23470 | 373 '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
|
374 " nil t nil nil nil nil nil nil nil nil t) |
18673 | 375 |
376 (quail-define-rules | |
377 ("'A" ?,AA(B) | |
378 ("'E" ?,AI(B) | |
379 ("'I" ?,AM(B) | |
380 ("'O" ?,AS(B) | |
381 ("'U" ?,AZ(B) | |
382 ("'a" ?,Aa(B) | |
383 ("'e" ?,Ai(B) | |
384 ("'i" ?,Am(B) | |
385 ("'o" ?,As(B) | |
386 ("'u" ?,Az(B) | |
387 ("' " ?') | |
388 ) | |
389 | |
390 (quail-define-package | |
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
391 "portuguese-prefix" "Latin-1" "PT>" t |
18673 | 392 "Portuguese input method with prefix modifiers |
393 | |
394 effect | prefix | examples | |
395 ------------+--------+---------- | |
23470 | 396 acute | ' | 'a -> ,Aa(B '' -> ,A4(B |
18673 | 397 grave | ` | `a -> ,A`(B |
398 circumflex | ^ | ^a -> ,Ab(B | |
399 diaeresis | \" | \"u -> ,A|(B | |
400 tilde | ~ | ~a -> ,Ac(B | |
23470 | 401 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
|
402 " nil t nil nil nil nil nil nil nil nil t) |
18673 | 403 |
404 (quail-define-rules | |
405 ("'A" ?,AA(B) | |
406 ("'E" ?,AI(B) | |
407 ("'I" ?,AM(B) | |
408 ("'O" ?,AS(B) | |
409 ("'U" ?,AZ(B) | |
410 ("'C" ?,AG(B) | |
411 ("'a" ?,Aa(B) | |
412 ("'e" ?,Ai(B) | |
413 ("'i" ?,Am(B) | |
414 ("'o" ?,As(B) | |
415 ("'u" ?,Az(B) | |
416 ("'c" ?,Ag(B) | |
417 ("' " ?') | |
418 ("`A" ?,A@(B) | |
419 ("`a" ?,A`(B) | |
420 ("` " ?`) | |
421 ("^A" ?,AB(B) | |
422 ("^E" ?,AJ(B) | |
423 ("^O" ?,AT(B) | |
424 ("^a" ?,Ab(B) | |
425 ("^e" ?,Aj(B) | |
426 ("^o" ?,At(B) | |
427 ("^ " ?^) | |
428 ("\"U" ?,A\(B) | |
429 ("\"u" ?,A|(B) | |
430 ("\" " ?\") | |
431 ("~A" ?,AC(B) | |
432 ("~O" ?,AU(B) | |
433 ("~a" ?,Ac(B) | |
434 ("~o" ?,Au(B) | |
435 ("~ " ?~) | |
436 (",c" ?,Ag(B) | |
437 (",C" ?,AG(B) | |
438 (",," ?,) | |
439 ) | |
440 | |
441 (quail-define-package | |
42023
b8cca72f7c5f
("french-prefix", "german-prefix")
Dave Love <fx@gnu.org>
parents:
40708
diff
changeset
|
442 "spanish-prefix" "Spanish" "ES>" t |
18673 | 443 "Spanish (Espa,Aq(Bol) input method with prefix modifiers |
444 | |
445 effect | prefix | examples | |
446 ------------+--------+---------- | |
447 acute | ' | 'a -> ,Aa(B | |
448 diaeresis | \" | \"u -> ,A|(B | |
449 tilde | ~ | ~n -> ,Aq(B | |
23470 | 450 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
|
451 " nil t nil nil nil nil nil nil nil nil t) |
18673 | 452 |
453 (quail-define-rules | |
454 ("'A" ?,AA(B) | |
455 ("'E" ?,AI(B) | |
456 ("'I" ?,AM(B) | |
457 ("'O" ?,AS(B) | |
458 ("'U" ?,AZ(B) | |
459 ("'a" ?,Aa(B) | |
460 ("'e" ?,Ai(B) | |
461 ("'i" ?,Am(B) | |
462 ("'o" ?,As(B) | |
463 ("'u" ?,Az(B) | |
464 ("' " ?') | |
465 ("\"U" ?,A\(B) | |
466 ("\"u" ?,A|(B) | |
467 ("\" " ?\") | |
468 ("~N" ?,AQ(B) | |
469 ("~n" ?,Aq(B) | |
470 ("~>" ?\,A;(B) | |
471 ("~<" ?\,A+(B) | |
472 ("~!" ?,A!(B) | |
473 ("~?" ?,A?(B) | |
474 ("~ " ?~) | |
475 ) | |
476 | |
477 (quail-define-package | |
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
478 "latin-2-prefix" "Latin-2" "2>" t |
18673 | 479 "Latin-2 characters input method with prefix modifiers |
480 | |
481 effect | prefix | examples | |
482 ------------+--------+---------- | |
23470 | 483 acute | ' | 'a -> ,Ba(B '' -> ?,B4(B |
18673 | 484 circumflex | ^ | ^a -> ,Bb(B |
23470 | 485 diaeresis | \" | \"a -> ,Bd(B \"\" -> ,B((B |
18673 | 486 breve | ~ | ~a -> ,Bc(B |
487 caron | ~ | ~c -> ,Bh(B | |
23470 | 488 cedilla | ` | `c -> ,Bg(B `e -> ?,Bj(B |
489 misc | ' ` ~ | 'd -> ,Bp(B `l -> ,B3(B `z -> ,B?(B ~o -> ,Bu(B ~u -> ,B{(B | |
490 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
|
491 " nil t nil nil nil nil nil nil nil nil t) |
18673 | 492 |
493 (quail-define-rules | |
494 ("'A" ?,BA(B) | |
495 ("'C" ?,BF(B) | |
496 ("'D" ?,BP(B) | |
497 ("'E" ?,BI(B) | |
498 ("'I" ?,BM(B) | |
499 ("'L" ?,BE(B) | |
500 ("'N" ?,BQ(B) | |
501 ("'O" ?,BS(B) | |
502 ("'R" ?,B@(B) | |
503 ("'S" ?,B&(B) | |
504 ("'U" ?,BZ(B) | |
505 ("'Y" ?,B](B) | |
506 ("'Z" ?,B,(B) | |
507 ("'a" ?,Ba(B) | |
508 ("'c" ?,Bf(B) | |
509 ("'d" ?,Bp(B) | |
510 ("'e" ?,Bi(B) | |
511 ("'i" ?,Bm(B) | |
512 ("'l" ?,Be(B) | |
513 ("'n" ?,Bq(B) | |
514 ("'o" ?,Bs(B) | |
515 ("'r" ?,B`(B) | |
516 ("'s" ?,B6(B) | |
517 ("'u" ?,Bz(B) | |
518 ("'y" ?,B}(B) | |
519 ("'z" ?,B<(B) | |
520 ("''" ?,B4(B) | |
521 ("' " ?') | |
522 ("`A" ?,B!(B) | |
523 ("`C" ?,BG(B) | |
524 ("`E" ?,BJ(B) | |
525 ("`L" ?,B#(B) | |
526 ("`S" ?,B*(B) | |
527 ("`T" ?,B^(B) | |
528 ("`Z" ?,B/(B) | |
529 ("`a" ?,B1(B) | |
530 ("`l" ?,B3(B) | |
531 ("`c" ?,Bg(B) | |
532 ("`e" ?,Bj(B) | |
533 ("`s" ?,B:(B) | |
534 ("`t" ?,B~(B) | |
535 ("`z" ?,B?(B) | |
536 ("``" ?,B*(B) | |
537 ("`." ?,B(B) | |
538 ("` " ?`) | |
539 ("^A" ?,BB(B) | |
540 ("^I" ?,BN(B) | |
541 ("^O" ?,BT(B) | |
542 ("^a" ?,Bb(B) | |
543 ("^i" ?,Bn(B) | |
544 ("^o" ?,Bt(B) | |
545 ("^^" ?^) | |
546 ("^ " ?^) | |
547 ("\"A" ?,BD(B) | |
548 ("\"E" ?,BK(B) | |
549 ("\"O" ?,BV(B) | |
550 ("\"U" ?,B\(B) | |
551 ("\"a" ?,Bd(B) | |
552 ("\"e" ?,Bk(B) | |
553 ("\"o" ?,Bv(B) | |
554 ("\"s" ?,B_(B) | |
555 ("\"u" ?,B|(B) | |
556 ("\"\"" ?,B((B) | |
557 ("\" " ?\") | |
558 ("~A" ?,BC(B) | |
559 ("~C" ?,BH(B) | |
560 ("~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
|
561 ("~E" ?,BL(B) |
18673 | 562 ("~L" ?,B%(B) |
563 ("~N" ?,BR(B) | |
564 ("~O" ?,BU(B) | |
565 ("~R" ?,BX(B) | |
566 ("~S" ?,B)(B) | |
567 ("~T" ?,B+(B) | |
568 ("~U" ?,B[(B) | |
569 ("~Z" ?,B.(B) | |
570 ("~a" ?,Bc(B) | |
571 ("~c" ?,Bh(B) | |
572 ("~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
|
573 ("~e" ?,Bl(B) |
18673 | 574 ("~l" ?,B5(B) |
575 ("~n" ?,Br(B) | |
576 ("~o" ?,Bu(B) | |
577 ("~r" ?,Bx(B) | |
578 ("~s" ?,B9(B) | |
579 ("~t" ?,B;(B) | |
580 ("~u" ?,B{(B) | |
581 ("~z" ?,B>(B) | |
582 ("~v" ?,B"(B) | |
583 ("~~" ?,B"(B) | |
584 ("~." ?,B8(B) | |
585 ("~ " ?~) | |
586 ) | |
587 | |
588 (quail-define-package | |
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
589 "latin-3-prefix" "Latin-3" "3>" t |
18673 | 590 "Latin-3 characters input method with prefix modifiers |
591 | |
592 effect | prefix | examples | |
593 ------------+--------+---------- | |
23470 | 594 acute | ' | 'a -> ,Ca(B '' -> ?,C4(B |
18673 | 595 grave | ` | `a -> ,C`(B |
596 circumflex | ^ | ^a -> ,Cb(B | |
23470 | 597 diaeresis | \" | \"a -> ,Cd(B \"\" -> ,C((B |
598 cedilla | ~ | ~c -> ,Cg(B ~s -> ,C:(B ~~ -> ,C8(B | |
46664 | 599 dot above | / . | /g -> ,Cu(B .o -> ,Cu(B |
23470 | 600 misc | \" ~ / | \"s -> ,C_(B ~g -> ,C;(B ~u -> ,C}(B /h -> ,C1(B /i -> ,C9(B |
601 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
|
602 " nil t nil nil nil nil nil nil nil nil t) |
18673 | 603 |
604 (quail-define-rules | |
605 ("'A" ?,CA(B) | |
606 ("'E" ?,CI(B) | |
607 ("'I" ?,CM(B) | |
608 ("'O" ?,CS(B) | |
609 ("'U" ?,CZ(B) | |
610 ("'a" ?,Ca(B) | |
611 ("'e" ?,Ci(B) | |
612 ("'i" ?,Cm(B) | |
613 ("'o" ?,Cs(B) | |
614 ("'u" ?,Cz(B) | |
615 ("''" ?,C4(B) | |
616 ("' " ?') | |
617 ("`A" ?,C@(B) | |
618 ("`E" ?,CH(B) | |
619 ("`I" ?,CL(B) | |
620 ("`O" ?,CR(B) | |
621 ("`U" ?,CY(B) | |
622 ("`a" ?,C`(B) | |
623 ("`e" ?,Ch(B) | |
624 ("`i" ?,Cl(B) | |
625 ("`o" ?,Cr(B) | |
626 ("`u" ?,Cy(B) | |
627 ("``" ?`) | |
628 ("` " ?`) | |
629 ("^A" ?,CB(B) | |
630 ("^C" ?,CF(B) | |
631 ("^E" ?,CJ(B) | |
632 ("^G" ?,CX(B) | |
633 ("^H" ?,C&(B) | |
634 ("^I" ?,CN(B) | |
635 ("^J" ?,C,(B) | |
636 ("^O" ?,CT(B) | |
637 ("^S" ?,C^(B) | |
638 ("^U" ?,C[(B) | |
639 ("^a" ?,Cb(B) | |
640 ("^c" ?,Cf(B) | |
641 ("^e" ?,Cj(B) | |
642 ("^g" ?,Cx(B) | |
643 ("^h" ?,C6(B) | |
644 ("^i" ?,Cn(B) | |
645 ("^j" ?,C<(B) | |
646 ("^o" ?,Ct(B) | |
647 ("^s" ?,C~(B) | |
648 ("^u" ?,C{(B) | |
649 ("^^" ?^) | |
650 ("^ " ?^) | |
651 ("\"A" ?,CD(B) | |
652 ("\"E" ?,CK(B) | |
653 ("\"I" ?,CO(B) | |
654 ("\"O" ?,CV(B) | |
655 ("\"U" ?,C\(B) | |
656 ("\"a" ?,Cd(B) | |
657 ("\"e" ?,Ck(B) | |
658 ("\"i" ?,Co(B) | |
659 ("\"o" ?,Cv(B) | |
660 ("\"u" ?,C|(B) | |
661 ("\"s" ?,C_(B) | |
662 ("\"\"" ?,C((B) | |
663 ("\" " ?\") | |
664 ("~C" ?,CG(B) | |
665 ("~N" ?,CQ(B) | |
666 ("~c" ?,Cg(B) | |
667 ("~n" ?,Cq(B) | |
668 ("~S" ?,C*(B) | |
669 ("~s" ?,C:(B) | |
670 ("~G" ?,C+(B) | |
671 ("~g" ?,C;(B) | |
672 ("~U" ?,C](B) | |
673 ("~u" ?,C}(B) | |
674 ("~`" ?,C"(B) | |
675 ("~~" ?,C8(B) | |
676 ("~ " ?~) | |
677 ("/C" ?,CE(B) | |
678 ("/G" ?,CU(B) | |
679 ("/H" ?,C!(B) | |
680 ("/I" ?,C)(B) | |
681 ("/Z" ?,C/(B) | |
682 ("/c" ?,Ce(B) | |
683 ("/g" ?,Cu(B) | |
684 ("/h" ?,C1(B) | |
685 ("/i" ?,C9(B) | |
686 ("/z" ?,C?(B) | |
687 ("/." ?,C(B) | |
688 ("/#" ?,C#(B) | |
689 ("/$" ?,C$(B) | |
690 ("//" ?,C0(B) | |
691 ("/ " ?/) | |
692 (".C" ?,CE(B) | |
693 (".G" ?,CU(B) | |
694 (".I" ?,C)(B) | |
695 (".Z" ?,C/(B) | |
696 (".c" ?,Ce(B) | |
697 (".g" ?,Cu(B) | |
698 (".z" ?,C?(B) | |
699 ) | |
28434
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
700 |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
701 |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
702 (quail-define-package |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
703 "polish-slash" "Polish" "PL>" nil |
50768
e9b4703b57d9
("polish-slash"): Add the rule "//"->?/.
Kenichi Handa <handa@m17n.org>
parents:
49600
diff
changeset
|
704 "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
|
705 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
|
706 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
|
707 |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
708 (quail-define-rules |
50768
e9b4703b57d9
("polish-slash"): Add the rule "//"->?/.
Kenichi Handa <handa@m17n.org>
parents:
49600
diff
changeset
|
709 ("//" ?/) |
28434
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
710 ("/a" ?,B1(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
711 ("/c" ?,Bf(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
712 ("/e" ?,Bj(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
713 ("/l" ?,B3(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
714 ("/n" ?,Bq(B) |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
715 ("/o" ?,Bs(B) |
28434
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
716 ("/s" ?,B6(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
717 ("/x" ?,B<(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
718 ("/z" ?,B?(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
719 ("/A" ?,B!(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
720 ("/C" ?,BF(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
721 ("/E" ?,BJ(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
722 ("/L" ?,B#(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
723 ("/N" ?,BQ(B) |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
724 ("/O" ?,BS(B) |
28434
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
725 ("/S" ?,B&(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
726 ("/X" ?,B,(B) |
08cd5ffb5799
("polish-slash"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
27940
diff
changeset
|
727 ("/Z" ?,B/(B)) |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
728 |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
729 (quail-define-package |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
730 "latin-9-prefix" "Latin-9" "0>" t |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
731 "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
|
732 |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
733 effect | prefix | examples |
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 acute | ' | 'a -> ,ba(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
736 grave | ` | `a -> ,b`(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
737 circumflex | ^ | ^a -> ,bb(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
738 diaeresis | \" | \"a -> ,bd(B, \"Y -> ,b>(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
739 tilde | ~ | ~a -> ,bc(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
740 caron | ~ | ~z -> ,b8(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
741 cedilla | ~ | ~c -> ,bg(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
742 misc | \" ~ / | \"s -> ,b_(B ~d -> ,bp(B ~t -> ,b~(B /a -> ,be(B /e -> ,bf(B /o -> ,bx(B |
34694 | 743 | \" ~ / | /o -> ,b=(B |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
744 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
|
745 | ~ | ~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
|
746 | ~ | ~- -> ,b-(B ~= -> ,b/(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
747 symbol | _ / | _o -> ,b:(B _a -> ,b*(B // -> ,b0(B /\\ -> ,bW(B _y -> ,b%(B |
34694 | 748 | _ / | _: -> ,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
|
749 | _ / | /= -> ,b,(B |
34694 | 750 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
|
751 " 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
|
752 |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
753 (quail-define-rules |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
754 ("'A" ?,bA(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
755 ("'E" ?,bI(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
756 ("'I" ?,bM(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
757 ("'O" ?,bS(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
758 ("'U" ?,bZ(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
759 ("'Y" ?,b](B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
760 ("'a" ?,ba(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
761 ("'e" ?,bi(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
762 ("'i" ?,bm(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
763 ("'o" ?,bs(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
764 ("'u" ?,bz(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
765 ("'y" ?,b}(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
766 ("' " ?') |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
767 ("`A" ?,b@(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
768 ("`E" ?,bH(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
769 ("`I" ?,bL(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
770 ("`O" ?,bR(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
771 ("`U" ?,bY(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
772 ("`a" ?,b`(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
773 ("`e" ?,bh(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
774 ("`i" ?,bl(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
775 ("`o" ?,br(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
776 ("`u" ?,by(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
777 ("``" ?`) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
778 ("` " ?`) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
779 ("^A" ?,bB(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
780 ("^E" ?,bJ(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
781 ("^I" ?,bN(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
782 ("^O" ?,bT(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
783 ("^U" ?,b[(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
784 ("^a" ?,bb(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
785 ("^e" ?,bj(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
786 ("^i" ?,bn(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
787 ("^o" ?,bt(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
788 ("^u" ?,b{(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
789 ("^^" ?^) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
790 ("^ " ?^) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
791 ("\"A" ?,bD(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
792 ("\"E" ?,bK(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
793 ("\"I" ?,bO(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
794 ("\"O" ?,bV(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
795 ("\"U" ?,b\(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
796 ("\"a" ?,bd(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
797 ("\"e" ?,bk(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
798 ("\"i" ?,bo(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
799 ("\"o" ?,bv(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
800 ("\"s" ?,b_(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
801 ("\"u" ?,b|(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
802 ("\"y" ?,b(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
803 ("\" " ?\") |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
804 ("~A" ?,bC(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
805 ("~C" ?,bG(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
806 ("~D" ?,bP(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
807 ("~N" ?,bQ(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
808 ("~O" ?,bU(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
809 ("~S" ?,b&(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
810 ("~T" ?,b^(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
811 ("~Z" ?,b4(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
812 ("~a" ?,bc(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
813 ("~c" ?,bg(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
814 ("~d" ?,bp(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
815 ("~n" ?,bq(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
816 ("~o" ?,bu(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
817 ("~s" ?,b((B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
818 ("~t" ?,b~(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
819 ("~z" ?,b8(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
820 ("~>" ?\,b;(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
821 ("~<" ?\,b+(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
822 ("~!" ?,b!(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
823 ("~?" ?,b?(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
824 ("~ " ?~) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
825 ("/A" ?,bE(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
826 ("/E" ?,bF(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
827 ("/O" ?,bX(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
828 ("/a" ?,be(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
829 ("/e" ?,bf(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
830 ("/o" ?,bx(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
831 ("//" ?,b0(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
832 ("/ " ?/) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
833 ("_o" ?,b:(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
834 ("_a" ?,b*(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
835 ("_+" ?,b1(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
836 ("_y" ?,b%(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
837 ("_:" ?,bw(B) |
60516
fb4694e71d60
("latin-1-prefix"): Add rule "__"->"_".
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
838 ("_ " ?,b (B) |
fb4694e71d60
("latin-1-prefix"): Add rule "__"->"_".
Kenichi Handa <handa@m17n.org>
parents:
52401
diff
changeset
|
839 ("__" ?_) |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
840 ("/c" ?,b"(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
841 ("/\\" ?,bW(B) |
34694 | 842 ("/o" ?,b=(B) ; clash with ,bx(B, but ,bf(B uses / |
843 ("/O" ?,b<(B) | |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
844 ("\"Y" ?,b>(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
845 ("~s" ?,b'(B) |
34694 | 846 ("~p" ?,b6(B) |
31268
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
847 ;; 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
|
848 ("~e" ?,b$(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
849 ("~." ?,b7(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
850 ("~$" ?,b#(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
851 ("~u" ?,b5(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
852 ("^r" ?,b.(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
853 ("^c" ?,b)(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
854 ("^1" ?,b9(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
855 ("^2" ?,b2(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
856 ("^3" ?,b3(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
857 ("~-" ?,b-(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
858 ("~=" ?,b/(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
859 ("/=" ?,b,(B)) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
860 |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
861 ;; 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
|
862 ;; squint at it. |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
863 |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
864 (quail-define-package |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
865 "latin-8-prefix" "Latin-8" "8>" t |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
866 "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
|
867 |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
868 effect | prefix | examples |
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 acute | ' | 'a -> ,_a(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
871 grave | ` | `a -> ,_`(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
872 circumflex | ^ | ^w -> ,_p(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
873 diaeresis | \" | \"a -> ,_d(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
874 dot above | . | .b -> ,_"(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
875 tilde | ~ | ~a -> ,_c(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
876 cedilla | ~ | ~c -> ,_g(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
877 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
|
878 | ~ | ~s -> ,_'(B ~$ -> ,_#(B ~p -> ,_6(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
879 symbol | ^ | ^r -> ,_.(B ^c -> ,_)(B |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
880 " 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
|
881 |
46664 | 882 ;; 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
|
883 (quail-define-rules |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
884 (".B" ?,_!(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
885 (".b" ?,_"(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
886 (".c" ?,_%(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
887 (".C" ?,_$(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
888 (".D" ?,_&(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
889 (".d" ?,_+(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
890 (".f" ?,_1(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
891 (".F" ?,_0(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
892 (".g" ?,_3(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
893 (".G" ?,_2(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
894 (".m" ?,_5(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
895 (".M" ?,_4(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
896 (".p" ?,_9(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
897 (".P" ?,_7(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
898 (".s" ?,_?(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
899 (".S" ?,_;(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
900 (".t" ?,_w(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
901 (".T" ?,_W(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
902 ("'A" ?,_A(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
903 ("'E" ?,_I(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
904 ("'I" ?,_M(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
905 ("'O" ?,_S(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
906 ("'U" ?,_Z(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
907 ("'Y" ?,_](B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
908 ("'W" ?,_*(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
909 ("'a" ?,_a(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
910 ("'e" ?,_i(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
911 ("'i" ?,_m(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
912 ("'o" ?,_s(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
913 ("'u" ?,_z(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
914 ("'w" ?,_:(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
915 ("'y" ?,_}(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
916 ("' " ?') |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
917 ("`A" ?,_@(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
918 ("`E" ?,_H(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
919 ("`I" ?,_L(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
920 ("`O" ?,_R(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
921 ("`U" ?,_Y(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
922 ("`W" ?,_((B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
923 ("`Y" ?,_,(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
924 ("`a" ?,_`(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
925 ("`e" ?,_h(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
926 ("`i" ?,_l(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
927 ("`o" ?,_r(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
928 ("`u" ?,_y(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
929 ("`w" ?,_8(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
930 ("`y" ?,_<(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
931 ("``" ?`) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
932 ("` " ?`) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
933 ("^A" ?,_B(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
934 ("^E" ?,_J(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
935 ("^I" ?,_N(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
936 ("^O" ?,_T(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
937 ("^U" ?,_[(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
938 ("^a" ?,_b(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
939 ("^e" ?,_j(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
940 ("^i" ?,_n(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
941 ("^o" ?,_t(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
942 ("^u" ?,_{(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
943 ("^w" ?,_p(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
944 ("^W" ?,_P(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
945 ("^y" ?,_~(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
946 ("^Y" ?,_^(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
947 ("^^" ?^) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
948 ("^ " ?^) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
949 ("\"A" ?,_D(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
950 ("\"E" ?,_K(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
951 ("\"I" ?,_O(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
952 ("\"O" ?,_V(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
953 ("\"U" ?,_\(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
954 ("\"a" ?,_d(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
955 ("\"e" ?,_k(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
956 ("\"i" ?,_o(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
957 ("\"o" ?,_v(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
958 ("\"s" ?,__(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
959 ("\"u" ?,_|(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
960 ("\"w" ?,_>(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
961 ("\"W" ?,_=(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
962 ("\"y" ?,_(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
963 ("\"Y" ?,_/(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
964 ("\" " ?\") |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
965 ("~A" ?,_C(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
966 ("~C" ?,_G(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
967 ("~N" ?,_Q(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
968 ("~O" ?,_U(B) |
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 ("~ " ?~) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
974 ("/A" ?,_E(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
975 ("/E" ?,_F(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
976 ("/O" ?,_X(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
977 ("/a" ?,_e(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
978 ("/e" ?,_f(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
979 ("/o" ?,_x(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
980 ("/ " ?/) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
981 ("~p" ?,_6(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
982 ("~s" ?,_'(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
983 ("~$" ?,_#(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
984 ("^r" ?,_.(B) |
4c6d8d40e71c
("latin-9-prefix"): Change entries for ? and ?.
Dave Love <fx@gnu.org>
parents:
31134
diff
changeset
|
985 ("^c" ?,_)(B)) |
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
34694
diff
changeset
|
986 |
46667 | 987 (quail-define-package |
988 "latin-prefix" "Latin" "L>" t | |
989 "Latin characters input method with prefix modifiers. | |
990 This is the union of various input methods originally made for input | |
991 of characters from a single Latin-N charset. | |
992 | |
993 effect | prefix | examples | |
994 ------------+--------+---------- | |
995 acute | ' | 'a -> ,Aa(B, '' -> ,A4(B | |
996 grave | ` | `a -> ,A`(B | |
997 circumflex | ^ | ^a -> ,Ab(B | |
998 diaeresis | \" | \"a -> ,Ad(B \"\" -> ,A((B | |
999 tilde | ~ | ~a -> ,Ac(B | |
1000 cedilla | ~ | ~c -> ,Ag(B | |
1001 breve | ~ | ~a -> $,1 #(B | |
1002 caron | ~ | ~c -> $,1 -(B | |
1003 dot above | ~ / . | ~o -> $,1 A(B /o -> $,1 A(B .o -> $,1 A(B | |
1004 misc | \" ~ / | \"s -> ,A_(B ~d -> ,Ap(B ~t -> ,A~(B /a -> ,Ae(B /e -> ,Af(B /o -> ,Ax(B | |
1005 symbol | ~ | ~> -> ,A;(B ~< -> ,A+(B ~! -> ,A!(B ~? -> ,A?(B ~~ -> ,A8(B | |
1006 symbol | _ / | _o -> ,A:(B _a -> ,A*(B // -> ,A0(B /\\ -> ,AW(B _y -> ,A%(B | |
1007 symbol | ^ | ^r -> ,A.(B ^c -> ,A)(B ^1 -> ,A9(B ^2 -> ,A2(B ^3 -> ,A3(B | |
1008 " nil t nil nil nil nil nil nil nil nil t) | |
1009 | |
1010 (quail-define-rules | |
1011 ("' " ?') | |
1012 ("''" ?,A4(B) | |
1013 ("'A" ?,AA(B) | |
1014 ("'E" ?,AI(B) | |
1015 ("'I" ?,AM(B) | |
1016 ("'O" ?,AS(B) | |
1017 ("'U" ?,AZ(B) | |
1018 ("'W" ?$,1nb(B) | |
1019 ("'Y" ?,A](B) | |
1020 ("'a" ?,Aa(B) | |
1021 ("'e" ?,Ai(B) | |
1022 ("'i" ?,Am(B) | |
1023 ("'o" ?,As(B) | |
1024 ("'u" ?,Az(B) | |
1025 ("'w" ?$,1nc(B) | |
1026 ("'y" ?,A}(B) | |
1027 (".B" ?$,1mB(B) | |
1028 (".C" ?$,1 *(B) | |
1029 (".D" ?$,1mJ(B) | |
1030 (".F" ?$,1m^(B) | |
1031 (".G" ?$,1 @(B) | |
1032 (".I" ?$,1 P(B) | |
1033 (".M" ?$,1n (B) | |
1034 (".P" ?$,1n6(B) | |
1035 (".S" ?$,1n@(B) | |
1036 (".T" ?$,1nJ(B) | |
1037 (".Z" ?$,1!;(B) | |
1038 (".b" ?$,1mC(B) | |
1039 (".c" ?$,1 +(B) | |
1040 (".d" ?$,1mK(B) | |
1041 (".f" ?$,1m_(B) | |
1042 (".g" ?$,1 A(B) | |
1043 (".m" ?$,1n!(B) | |
1044 (".p" ?$,1n7(B) | |
1045 (".s" ?$,1nA(B) | |
1046 (".t" ?$,1nK(B) | |
1047 (".z" ?$,1!<(B) | |
1048 ("/ " ?/) | |
1049 ("/#" ?,A#(B) | |
1050 ("/$" ?,A$(B) | |
1051 ("/." ?$,1$y(B) | |
1052 ("//" ?,A0(B) | |
1053 ("/2" ?,A=(B) | |
1054 ("/3" ?,A>(B) | |
1055 ("/4" ?,A<(B) | |
1056 ("/=" ?,A,(B) | |
1057 ("/A" ?,AE(B) | |
1058 ("/C" ?$,1 *(B) | |
1059 ("/E" ?,AF(B) | |
1060 ("/G" ?$,1 @(B) | |
1061 ("/H" ?$,1 F(B) | |
1062 ("/I" ?$,1 P(B) | |
1063 ("/O" ?,AX(B) | |
1064 ("/O" ?$,1 r(B) | |
1065 ("/Z" ?$,1!;(B) | |
1066 ("/\\" ?,AW(B) | |
1067 ("/a" ?,Ae(B) | |
1068 ("/c" ?,A"(B) | |
1069 ("/c" ?$,1 +(B) | |
1070 ("/e" ?,Af(B) | |
1071 ("/g" ?$,1 A(B) | |
1072 ("/h" ?$,1 G(B) | |
1073 ("/i" ?$,1 Q(B) | |
1074 ("/o" ?,Ax(B) | |
1075 ("/o" ?$,1 s(B) | |
1076 ("/z" ?$,1!<(B) | |
1077 ("\" " ?\") | |
1078 ("\"A" ?,AD(B) | |
1079 ("\"E" ?,AK(B) | |
1080 ("\"I" ?,AO(B) | |
1081 ("\"O" ?,AV(B) | |
1082 ("\"U" ?,A\(B) | |
1083 ("\"W" ?$,1nd(B) | |
1084 ("\"Y" ?$,1!8(B) | |
1085 ("\"\"" ?,A((B) | |
1086 ("\"a" ?,Ad(B) | |
1087 ("\"e" ?,Ak(B) | |
1088 ("\"i" ?,Ao(B) | |
1089 ("\"o" ?,Av(B) | |
1090 ("\"s" ?,A_(B) | |
1091 ("\"u" ?,A|(B) | |
1092 ("\"w" ?$,1ne(B) | |
1093 ("\"y" ?,A(B) | |
1094 ("^ " ?^) | |
1095 ("^1" ?,A9(B) | |
1096 ("^2" ?,A2(B) | |
1097 ("^3" ?,A3(B) | |
1098 ("^A" ?,AB(B) | |
1099 ("^C" ?$,1 ((B) | |
1100 ("^E" ?,AJ(B) | |
1101 ("^G" ?$,1 <(B) | |
1102 ("^H" ?$,1 D(B) | |
1103 ("^I" ?,AN(B) | |
1104 ("^J" ?$,1 T(B) | |
1105 ("^O" ?,AT(B) | |
1106 ("^S" ?$,1 |(B) | |
1107 ("^U" ?,A[(B) | |
1108 ("^W" ?$,1!4(B) | |
1109 ("^Y" ?$,1!6(B) | |
1110 ("^^" ?^) | |
1111 ("^a" ?,Ab(B) | |
1112 ("^c" ?,A)(B) | |
1113 ("^c" ?$,1 )(B) | |
1114 ("^e" ?,Aj(B) | |
1115 ("^g" ?$,1 =(B) | |
1116 ("^h" ?$,1 E(B) | |
1117 ("^i" ?,An(B) | |
1118 ("^j" ?$,1 U(B) | |
1119 ("^o" ?,At(B) | |
1120 ("^r" ?,A.(B) | |
1121 ("^s" ?$,1 }(B) | |
1122 ("^u" ?,A{(B) | |
1123 ("^w" ?$,1!5(B) | |
1124 ("^y" ?$,1!7(B) | |
1125 ("_+" ?,A1(B) | |
1126 ("_:" ?,Aw(B) | |
1127 ("_a" ?,A*(B) | |
1128 ("_o" ?,A:(B) | |
1129 ("_y" ?,A%(B) | |
1130 ("_ " ?,A (B) | |
1131 ("` " ?`) | |
1132 ("`A" ?,A@(B) | |
1133 ("`E" ?,AH(B) | |
1134 ("`I" ?,AL(B) | |
1135 ("`O" ?,AR(B) | |
1136 ("`U" ?,AY(B) | |
1137 ("`W" ?$,1n`(B) | |
1138 ("`Y" ?$,1or(B) | |
1139 ("``" ?`) | |
1140 ("`a" ?,A`(B) | |
1141 ("`e" ?,Ah(B) | |
1142 ("`i" ?,Al(B) | |
1143 ("`o" ?,Ar(B) | |
1144 ("`u" ?,Ay(B) | |
1145 ("`w" ?$,1na(B) | |
1146 ("`y" ?$,1os(B) | |
1147 ("~ " ?~) | |
1148 ("~!" ?,A!(B) | |
1149 ("~$" ?,A#(B) | |
1150 ("~-" ?,A-(B) | |
1151 ("~." ?,A7(B) | |
1152 ("~<" ?\,A+(B) | |
1153 ("~=" ?,A/(B) | |
1154 ("~>" ?\,A;(B) | |
1155 ("~?" ?,A?(B) | |
1156 ("~A" ?,AC(B) | |
1157 ("~C" ?,AG(B) | |
1158 ("~D" ?,AP(B) | |
1159 ("~G" ?$,1 >(B) | |
1160 ("~N" ?,AQ(B) | |
1161 ("~O" ?,AU(B) | |
1162 ("~O" ?$,1 @(B) | |
1163 ("~S" ?$,1 ~(B) | |
1164 ("~S" ?$,1! (B) | |
1165 ("~T" ?,A^(B) | |
1166 ("~U" ?$,1!,(B) | |
1167 ("~Z" ?$,1!=(B) | |
1168 ("~`" ?$,1$x(B) | |
1169 ("~a" ?,Ac(B) | |
1170 ("~c" ?,Ag(B) | |
1171 ("~d" ?,Ap(B) | |
1172 ("~e" ?$,1tL(B) | |
1173 ("~g" ?$,1 ?(B) | |
1174 ("~n" ?,Aq(B) | |
1175 ("~o" ?,Au(B) | |
1176 ("~o" ?$,1 A(B) | |
1177 ("~p" ?,A6(B) | |
1178 ("~s" ?,A'(B) | |
1179 ("~s" ?$,1 (B) | |
1180 ("~s" ?$,1!!(B) | |
1181 ("~t" ?,A~(B) | |
1182 ("~u" ?,A5(B) | |
1183 ("~u" ?$,1!-(B) | |
1184 ("~x" ?,A$(B) | |
1185 ("~z" ?$,1!>(B) | |
1186 ("~|" ?,A&(B) | |
1187 ("~~" ?,A8(B) | |
1188 ) | |
52401 | 1189 |
1190 ;;; 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
|
1191 ;;; latin-pre.el ends here |