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