Mercurial > emacs
annotate leim/quail/latin-pre.el @ 27064:9a83b898793c
(electric-command-history): Call Command-history-setup
and command-history-mode using their new conventions.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 31 Dec 1999 23:41:11 +0000 |
| parents | 62c80c35f341 |
| children | ad4ce97753b4 |
| rev | line source |
|---|---|
| 18673 | 1 ;;; latin-pre.el -- Quail packages for inputting various European characters. |
| 2 | |
| 3 ;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN. | |
| 4 ;; Licensed to the Free Software Foundation. | |
| 5 | |
| 6 ;; Keywords: mule, multilingual, latin, input method | |
| 7 | |
| 8 ;; This file is part of GNU Emacs. | |
| 9 | |
| 10 ;; GNU Emacs is free software; you can redistribute it and/or modify | |
| 11 ;; it under the terms of the GNU General Public License as published by | |
| 12 ;; the Free Software Foundation; either version 2, or (at your option) | |
| 13 ;; any later version. | |
| 14 | |
| 15 ;; GNU Emacs is distributed in the hope that it will be useful, | |
| 16 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 17 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| 18 ;; GNU General Public License for more details. | |
| 19 | |
| 20 ;; You should have received a copy of the GNU General Public License | |
| 21 ;; along with GNU Emacs; see the file COPYING. If not, write to the | |
| 22 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, | |
| 23 ;; Boston, MA 02111-1307, USA. | |
| 24 | |
| 25 ;;; Commentary: | |
| 26 | |
| 27 ;; All key translation maps are copied from iso-acc.el. | |
| 28 | |
| 29 ;;; Code: | |
| 30 | |
| 31 (require 'quail) | |
| 32 | |
| 33 (quail-define-package | |
|
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
34 "latin-1-prefix" "Latin-1" "1>" t |
| 18673 | 35 "Latin-1 characters input method with prefix modifiers |
| 36 | |
| 37 effect | prefix | examples | |
| 38 ------------+--------+---------- | |
| 39 acute | ' | 'a -> ,Aa(B, '' -> ,A4(B | |
| 40 grave | ` | `a -> ,A`(B | |
| 41 circumflex | ^ | ^a -> ,Ab(B | |
| 23470 | 42 diaeresis | \" | \"a -> ,Ad(B \"\" -> ,A((B |
| 18673 | 43 tilde | ~ | ~a -> ,Ac(B |
| 44 cedilla | ~ | ~c -> ,Ag(B | |
| 23470 | 45 misc | \" ~ / | \"s -> ,A_(B ~d -> ,Ap(B ~t -> ,A~(B /a -> ,Ae(B /e -> ,Af(B /o -> ,Ax(B |
| 46 symbol | ~ | ~> -> ,A;(B ~< -> ,A+(B ~! -> ,A!(B ~? -> ,A?(B ~~ -> ,A8(B | |
| 47 symbol | _ / | _o -> ,A:(B _a -> ,A*(B // -> ,A0(B | |
|
19652
c1b01ff226c4
Pass t for the SIMPLE argument to quail-define-package.
Richard M. Stallman <rms@gnu.org>
parents:
18716
diff
changeset
|
48 " nil t nil nil nil nil nil nil nil nil t) |
| 18673 | 49 |
| 50 (quail-define-rules | |
| 51 ("'A" ?,AA(B) | |
| 52 ("'E" ?,AI(B) | |
| 53 ("'I" ?,AM(B) | |
| 54 ("'O" ?,AS(B) | |
| 55 ("'U" ?,AZ(B) | |
| 56 ("'Y" ?,A](B) | |
| 57 ("'a" ?,Aa(B) | |
| 58 ("'e" ?,Ai(B) | |
| 59 ("'i" ?,Am(B) | |
| 60 ("'o" ?,As(B) | |
| 61 ("'u" ?,Az(B) | |
| 62 ("'y" ?,A}(B) | |
| 63 ("''" ?,A4(B) | |
| 64 ("' " ?') | |
| 65 ("`A" ?,A@(B) | |
| 66 ("`E" ?,AH(B) | |
| 67 ("`I" ?,AL(B) | |
| 68 ("`O" ?,AR(B) | |
| 69 ("`U" ?,AY(B) | |
| 70 ("`a" ?,A`(B) | |
| 71 ("`e" ?,Ah(B) | |
| 72 ("`i" ?,Al(B) | |
| 73 ("`o" ?,Ar(B) | |
| 74 ("`u" ?,Ay(B) | |
| 75 ("``" ?`) | |
| 76 ("` " ?`) | |
| 77 ("^A" ?,AB(B) | |
| 78 ("^E" ?,AJ(B) | |
| 79 ("^I" ?,AN(B) | |
| 80 ("^O" ?,AT(B) | |
| 81 ("^U" ?,A[(B) | |
| 82 ("^a" ?,Ab(B) | |
| 83 ("^e" ?,Aj(B) | |
| 84 ("^i" ?,An(B) | |
| 85 ("^o" ?,At(B) | |
| 86 ("^u" ?,A{(B) | |
| 87 ("^^" ?^) | |
| 88 ("^ " ?^) | |
| 89 ("\"A" ?,AD(B) | |
| 90 ("\"E" ?,AK(B) | |
| 91 ("\"I" ?,AO(B) | |
| 92 ("\"O" ?,AV(B) | |
| 93 ("\"U" ?,A\(B) | |
| 94 ("\"a" ?,Ad(B) | |
| 95 ("\"e" ?,Ak(B) | |
| 96 ("\"i" ?,Ao(B) | |
| 97 ("\"o" ?,Av(B) | |
| 98 ("\"s" ?,A_(B) | |
| 99 ("\"u" ?,A|(B) | |
| 100 ("\"y" ?,A(B) | |
| 101 ("\"\"" ?,A((B) | |
| 102 ("\" " ?\") | |
| 103 ("~A" ?,AC(B) | |
| 104 ("~C" ?,AG(B) | |
| 105 ("~D" ?,AP(B) | |
| 106 ("~N" ?,AQ(B) | |
| 107 ("~O" ?,AU(B) | |
| 108 ("~T" ?,A^(B) | |
| 109 ("~a" ?,Ac(B) | |
| 110 ("~c" ?,Ag(B) | |
| 111 ("~d" ?,Ap(B) | |
| 112 ("~n" ?,Aq(B) | |
| 113 ("~o" ?,Au(B) | |
| 114 ("~t" ?,A~(B) | |
| 115 ("~>" ?\,A;(B) | |
| 116 ("~<" ?\,A+(B) | |
| 117 ("~!" ?,A!(B) | |
| 118 ("~?" ?,A?(B) | |
| 119 ("~~" ?,A8(B) | |
| 120 ("~ " ?~) | |
| 121 ("/A" ?,AE(B) | |
| 122 ("/E" ?,AF(B) | |
| 123 ("/O" ?,AX(B) | |
| 124 ("/a" ?,Ae(B) | |
| 125 ("/e" ?,Af(B) | |
| 126 ("/o" ?,Ax(B) | |
| 127 ("//" ?,A0(B) | |
|
21221
cb6ab6de7548
("latin-1-prefix"): Fix the translation of
Kenichi Handa <handa@m17n.org>
parents:
19652
diff
changeset
|
128 ("/ " ?/) |
| 23470 | 129 ("_o" ?,A:(B) |
| 130 ("_a" ?,A*(B) | |
| 18673 | 131 ) |
| 132 | |
| 133 (quail-define-package | |
|
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
134 "catalan-prefix" "Latin-1" "CA>" t |
| 18673 | 135 "Catalan and Spanish input method with prefix modifiers |
| 136 | |
| 137 effect | prefix | examples | |
| 138 ------------+--------+---------- | |
| 23470 | 139 acute | ' | 'a -> ,Aa(B '' -> ,A4(B |
| 18673 | 140 grave | ` | `a -> ,A`(B |
| 23470 | 141 diaeresis | \" | \"i -> ,Ao(B \"\" -> ,A((B |
| 18673 | 142 tilde | ~ | ~n -> ,Aq(B |
| 143 cedilla | ~ | ~c -> ,Ag(B | |
| 23470 | 144 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
|
145 " nil t nil nil nil nil nil nil nil nil t) |
| 18673 | 146 |
| 147 (quail-define-rules | |
| 148 ("'A" ?,AA(B) | |
| 149 ("'E" ?,AI(B) | |
| 150 ("'I" ?,AM(B) | |
| 151 ("'O" ?,AS(B) | |
| 152 ("'U" ?,AZ(B) | |
| 153 ("'a" ?,Aa(B) | |
| 154 ("'e" ?,Ai(B) | |
| 155 ("'i" ?,Am(B) | |
| 156 ("'o" ?,As(B) | |
| 157 ("'u" ?,Az(B) | |
| 158 ("' " ?') | |
| 159 ("`A" ?,A@(B) | |
| 160 ("`E" ?,AH(B) | |
| 161 ("`O" ?,AR(B) | |
| 162 ("`a" ?,A`(B) | |
| 163 ("`e" ?,Ah(B) | |
| 164 ("`o" ?,Ar(B) | |
| 165 ("` " ?`) | |
| 166 ("\"I" ?,AO(B) | |
| 167 ("\"U" ?,A\(B) | |
| 168 ("\"i" ?,Ao(B) | |
| 169 ("\"u" ?,A|(B) | |
| 170 ("\" " ?\") | |
| 171 ("~C" ?,AG(B) | |
| 172 ("~N" ?,AQ(B) | |
| 173 ("~c" ?,Ag(B) | |
| 174 ("~n" ?,Aq(B) | |
| 175 ("~>" ?\,A;(B) | |
| 176 ("~<" ?\,A+(B) | |
| 177 ("~!" ?,A!(B) | |
| 178 ("~?" ?,A?(B) | |
| 179 ("~ " ?~) | |
| 180 ) | |
| 181 | |
| 182 (quail-define-package | |
|
26822
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
183 "esperanto-prefix" "Latin-3" "EO>" t |
| 18673 | 184 "Esperanto input method with prefix modifiers |
| 185 Key translation rules are: | |
|
26822
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
186 ^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
|
187 ^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
|
188 " nil t nil nil nil nil nil nil nil nil t) |
| 18673 | 189 |
| 190 (quail-define-rules | |
|
26822
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
191 ("^H" ?,C&(B) |
|
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
192 ("^J" ?,C,(B) |
|
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
193 ("^h" ?,C6(B) |
|
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
194 ("^j" ?,C<(B) |
|
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
195 ("^C" ?,CF(B) |
|
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
196 ("^G" ?,CX(B) |
|
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
197 ("^S" ?,C^(B) |
|
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
198 ("^c" ?,Cf(B) |
|
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
199 ("^g" ?,Cx(B) |
|
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
200 ("^s" ?,C~(B) |
| 18673 | 201 ("^^" ?^) |
| 202 ("^ " ?^) | |
|
26822
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
203 ("~U" ?,C](B) |
|
62c80c35f341
("esperanto-prefix"): Make it produce Latin-3
Kenichi Handa <handa@m17n.org>
parents:
24705
diff
changeset
|
204 ("~u" ?,C}(B) |
| 18673 | 205 ("~ " ?~) |
| 206 ) | |
| 207 | |
| 208 (quail-define-package | |
|
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
209 "french-prefix" "Latin-1" "FR>" t |
| 18673 | 210 "French (Fran,Ag(Bais) input method with prefix modifiers |
| 211 | |
| 212 effect | prefix | examples | |
| 213 ------------+--------+---------- | |
| 214 acute | ' | 'e -> ,Ai(B | |
| 215 grave | ` | `a -> ,A`(B | |
| 216 circumflex | ^ | ^a -> ,Ab(B | |
| 217 diaeresis | \" | \"i -> ,Ao(B | |
| 23470 | 218 cedilla | ~ or , | ~c -> ,Ag(B ,c -> ,Ag(B |
| 219 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
|
220 " nil t nil nil nil nil nil nil nil nil t) |
| 18673 | 221 |
| 222 (quail-define-rules | |
| 223 ("'E" ?,AI(B) | |
| 224 ("'C" ?,AG(B) | |
| 225 ("'e" ?,Ai(B) | |
| 226 ("'c" ?,Ag(B) | |
| 227 ("' " ?') | |
| 228 ("`A" ?,A@(B) | |
| 229 ("`E" ?,AH(B) | |
| 230 ("`U" ?,AY(B) | |
| 231 ("`a" ?,A`(B) | |
| 232 ("`e" ?,Ah(B) | |
| 233 ("`u" ?,Ay(B) | |
| 234 ("` " ?`) | |
| 235 ("^A" ?,AB(B) | |
| 236 ("^E" ?,AJ(B) | |
| 237 ("^I" ?,AN(B) | |
| 238 ("^O" ?,AT(B) | |
| 239 ("^U" ?,A[(B) | |
| 240 ("^a" ?,Ab(B) | |
| 241 ("^e" ?,Aj(B) | |
| 242 ("^i" ?,An(B) | |
| 243 ("^o" ?,At(B) | |
| 244 ("^u" ?,A{(B) | |
| 245 ("^ " ?^) | |
| 246 ("\"E" ?,AK(B) | |
| 247 ("\"I" ?,AO(B) | |
| 248 ("\"e" ?,Ak(B) | |
| 249 ("\"i" ?,Ao(B) | |
| 250 ("\" " ?\") | |
| 251 ("~<" ?\,A+(B) | |
| 252 ("~>" ?\,A;(B) | |
| 253 ("~C" ?,AG(B) | |
| 254 ("~c" ?,Ag(B) | |
| 255 ("~," ?,) | |
| 256 (",C" ?,AG(B) | |
| 257 (",c" ?,Ag(B) | |
| 258 (", " ?~) | |
| 259 ) | |
| 260 | |
| 261 (quail-define-package | |
|
24705
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
262 "romanian-prefix" "Romanian" "RO>" t |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
263 "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
|
264 |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
265 effect | prefix | examples |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
266 ------------+--------+------------------ |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
267 tilde | ~ | ~a -> ,Bc(B |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
268 circumflex | ^ | ^a -> ,Bb(B, ^i -> ,Bn(B |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
269 cedilla | , | ,s -> ,B:(B, ,t -> ,B~(B |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
270 ~ | ~ | ~~ -> ~ |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
271 ^ | ^ | ^^ -> ^ |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
272 , | , | ,, -> , |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
273 " 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
|
274 |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
275 (quail-define-rules |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
276 ("~A" ?,BC(B) ("~a" ?,Bc(B) |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
277 ("^A" ?,BB(B) ("^a" ?,Bb(B) |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
278 ("^I" ?,BN(B) ("^i" ?,Bn(B) |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
279 (",S" ?,B*(B) (",s" ?,B:(B) |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
280 (",T" ?,B^(B) (",t" ?,B~(B) |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
281 ("^^" ?^) ("~~" ?~) (",," ?,)) |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
282 |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
283 (quail-define-package |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
284 "romanian-alt-prefix" "Romanian" "RO>" t |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
285 "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
|
286 |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
287 effect | prefix | examples |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
288 ------------+--------+------------------ |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
289 tilde | \" | \"a -> ,Bb(B |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
290 circumflex | ' | 'a -> ,Bb(B, 'i -> ,Bn(B |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
291 cedilla | ' | 's -> ,B:(B, 't -> ,B~(B |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
292 ' | ' | '' -> ' |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
293 \" | \" | \"\" -> \" |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
294 " 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
|
295 |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
296 (quail-define-rules |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
297 ("'A" ?,BC(B) ("'a" ?,Bc(B) |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
298 ("\"A" ?,BB(B) ("\"a" ?,Bb(B) |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
299 ("'I" ?,BN(B) ("'i" ?,Bn(B) |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
300 ("'S" ?,B*(B) ("'s" ?,B:(B) |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
301 ("'T" ?,B^(B) ("'t" ?,B~(B) |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
302 ("''" ?') ("\"\"" ?\")) |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
303 |
|
af1bca0bf79b
("romanian-prefix"): New input method.
Kenichi Handa <handa@m17n.org>
parents:
23470
diff
changeset
|
304 (quail-define-package |
|
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
305 "german-prefix" "Latin-1" "DE>" t |
| 18673 | 306 "German (Deutsch) input method with prefix modifiers |
| 307 Key translation rules are: | |
| 23470 | 308 \"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
|
309 " nil t nil nil nil nil nil nil nil nil t) |
| 18673 | 310 |
| 311 (quail-define-rules | |
| 312 ("\"A" ?,AD(B) | |
| 313 ("\"O" ?,AV(B) | |
| 314 ("\"U" ?,A\(B) | |
| 315 ("\"a" ?,Ad(B) | |
| 316 ("\"o" ?,Av(B) | |
| 317 ("\"u" ?,A|(B) | |
| 318 ("\"s" ?,A_(B) | |
| 319 ("\" " ?\") | |
| 320 ) | |
| 321 | |
| 322 (quail-define-package | |
|
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
323 "irish-prefix" "Latin-1" "GA>" t |
| 18673 | 324 "Irish input method with prefix modifiers |
| 325 Key translation rules are: | |
| 23470 | 326 '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
|
327 " nil t nil nil nil nil nil nil nil nil t) |
| 18673 | 328 |
| 329 (quail-define-rules | |
| 330 ("'A" ?,AA(B) | |
| 331 ("'E" ?,AI(B) | |
| 332 ("'I" ?,AM(B) | |
| 333 ("'O" ?,AS(B) | |
| 334 ("'U" ?,AZ(B) | |
| 335 ("'a" ?,Aa(B) | |
| 336 ("'e" ?,Ai(B) | |
| 337 ("'i" ?,Am(B) | |
| 338 ("'o" ?,As(B) | |
| 339 ("'u" ?,Az(B) | |
| 340 ("' " ?') | |
| 341 ) | |
| 342 | |
| 343 (quail-define-package | |
|
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
344 "portuguese-prefix" "Latin-1" "PT>" t |
| 18673 | 345 "Portuguese input method with prefix modifiers |
| 346 | |
| 347 effect | prefix | examples | |
| 348 ------------+--------+---------- | |
| 23470 | 349 acute | ' | 'a -> ,Aa(B '' -> ,A4(B |
| 18673 | 350 grave | ` | `a -> ,A`(B |
| 351 circumflex | ^ | ^a -> ,Ab(B | |
| 352 diaeresis | \" | \"u -> ,A|(B | |
| 353 tilde | ~ | ~a -> ,Ac(B | |
| 23470 | 354 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
|
355 " nil t nil nil nil nil nil nil nil nil t) |
| 18673 | 356 |
| 357 (quail-define-rules | |
| 358 ("'A" ?,AA(B) | |
| 359 ("'E" ?,AI(B) | |
| 360 ("'I" ?,AM(B) | |
| 361 ("'O" ?,AS(B) | |
| 362 ("'U" ?,AZ(B) | |
| 363 ("'C" ?,AG(B) | |
| 364 ("'a" ?,Aa(B) | |
| 365 ("'e" ?,Ai(B) | |
| 366 ("'i" ?,Am(B) | |
| 367 ("'o" ?,As(B) | |
| 368 ("'u" ?,Az(B) | |
| 369 ("'c" ?,Ag(B) | |
| 370 ("' " ?') | |
| 371 ("`A" ?,A@(B) | |
| 372 ("`a" ?,A`(B) | |
| 373 ("` " ?`) | |
| 374 ("^A" ?,AB(B) | |
| 375 ("^E" ?,AJ(B) | |
| 376 ("^O" ?,AT(B) | |
| 377 ("^a" ?,Ab(B) | |
| 378 ("^e" ?,Aj(B) | |
| 379 ("^o" ?,At(B) | |
| 380 ("^ " ?^) | |
| 381 ("\"U" ?,A\(B) | |
| 382 ("\"u" ?,A|(B) | |
| 383 ("\" " ?\") | |
| 384 ("~A" ?,AC(B) | |
| 385 ("~O" ?,AU(B) | |
| 386 ("~a" ?,Ac(B) | |
| 387 ("~o" ?,Au(B) | |
| 388 ("~ " ?~) | |
| 389 (",c" ?,Ag(B) | |
| 390 (",C" ?,AG(B) | |
| 391 (",," ?,) | |
| 392 ) | |
| 393 | |
| 394 (quail-define-package | |
|
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
395 "spanish-prefix" "Latin-1" "ES>" t |
| 18673 | 396 "Spanish (Espa,Aq(Bol) input method with prefix modifiers |
| 397 | |
| 398 effect | prefix | examples | |
| 399 ------------+--------+---------- | |
| 400 acute | ' | 'a -> ,Aa(B | |
| 401 diaeresis | \" | \"u -> ,A|(B | |
| 402 tilde | ~ | ~n -> ,Aq(B | |
| 23470 | 403 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
|
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 ("'a" ?,Aa(B) | |
| 413 ("'e" ?,Ai(B) | |
| 414 ("'i" ?,Am(B) | |
| 415 ("'o" ?,As(B) | |
| 416 ("'u" ?,Az(B) | |
| 417 ("' " ?') | |
| 418 ("\"U" ?,A\(B) | |
| 419 ("\"u" ?,A|(B) | |
| 420 ("\" " ?\") | |
| 421 ("~N" ?,AQ(B) | |
| 422 ("~n" ?,Aq(B) | |
| 423 ("~>" ?\,A;(B) | |
| 424 ("~<" ?\,A+(B) | |
| 425 ("~!" ?,A!(B) | |
| 426 ("~?" ?,A?(B) | |
| 427 ("~ " ?~) | |
| 428 ) | |
| 429 | |
| 430 (quail-define-package | |
|
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
431 "latin-2-prefix" "Latin-2" "2>" t |
| 18673 | 432 "Latin-2 characters input method with prefix modifiers |
| 433 | |
| 434 effect | prefix | examples | |
| 435 ------------+--------+---------- | |
| 23470 | 436 acute | ' | 'a -> ,Ba(B '' -> ?,B4(B |
| 18673 | 437 circumflex | ^ | ^a -> ,Bb(B |
| 23470 | 438 diaeresis | \" | \"a -> ,Bd(B \"\" -> ,B((B |
| 18673 | 439 breve | ~ | ~a -> ,Bc(B |
| 440 caron | ~ | ~c -> ,Bh(B | |
| 23470 | 441 cedilla | ` | `c -> ,Bg(B `e -> ?,Bj(B |
| 442 misc | ' ` ~ | 'd -> ,Bp(B `l -> ,B3(B `z -> ,B?(B ~o -> ,Bu(B ~u -> ,B{(B | |
| 443 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
|
444 " nil t nil nil nil nil nil nil nil nil t) |
| 18673 | 445 |
| 446 (quail-define-rules | |
| 447 ("'A" ?,BA(B) | |
| 448 ("'C" ?,BF(B) | |
| 449 ("'D" ?,BP(B) | |
| 450 ("'E" ?,BI(B) | |
| 451 ("'I" ?,BM(B) | |
| 452 ("'L" ?,BE(B) | |
| 453 ("'N" ?,BQ(B) | |
| 454 ("'O" ?,BS(B) | |
| 455 ("'R" ?,B@(B) | |
| 456 ("'S" ?,B&(B) | |
| 457 ("'U" ?,BZ(B) | |
| 458 ("'Y" ?,B](B) | |
| 459 ("'Z" ?,B,(B) | |
| 460 ("'a" ?,Ba(B) | |
| 461 ("'c" ?,Bf(B) | |
| 462 ("'d" ?,Bp(B) | |
| 463 ("'e" ?,Bi(B) | |
| 464 ("'i" ?,Bm(B) | |
| 465 ("'l" ?,Be(B) | |
| 466 ("'n" ?,Bq(B) | |
| 467 ("'o" ?,Bs(B) | |
| 468 ("'r" ?,B`(B) | |
| 469 ("'s" ?,B6(B) | |
| 470 ("'u" ?,Bz(B) | |
| 471 ("'y" ?,B}(B) | |
| 472 ("'z" ?,B<(B) | |
| 473 ("''" ?,B4(B) | |
| 474 ("' " ?') | |
| 475 ("`A" ?,B!(B) | |
| 476 ("`C" ?,BG(B) | |
| 477 ("`E" ?,BJ(B) | |
| 478 ("`L" ?,B#(B) | |
| 479 ("`S" ?,B*(B) | |
| 480 ("`T" ?,B^(B) | |
| 481 ("`Z" ?,B/(B) | |
| 482 ("`a" ?,B1(B) | |
| 483 ("`l" ?,B3(B) | |
| 484 ("`c" ?,Bg(B) | |
| 485 ("`e" ?,Bj(B) | |
| 486 ("`s" ?,B:(B) | |
| 487 ("`t" ?,B~(B) | |
| 488 ("`z" ?,B?(B) | |
| 489 ("``" ?,B*(B) | |
| 490 ("`." ?,B(B) | |
| 491 ("` " ?`) | |
| 492 ("^A" ?,BB(B) | |
| 493 ("^I" ?,BN(B) | |
| 494 ("^O" ?,BT(B) | |
| 495 ("^a" ?,Bb(B) | |
| 496 ("^i" ?,Bn(B) | |
| 497 ("^o" ?,Bt(B) | |
| 498 ("^^" ?^) | |
| 499 ("^ " ?^) | |
| 500 ("\"A" ?,BD(B) | |
| 501 ("\"E" ?,BK(B) | |
| 502 ("\"O" ?,BV(B) | |
| 503 ("\"U" ?,B\(B) | |
| 504 ("\"a" ?,Bd(B) | |
| 505 ("\"e" ?,Bk(B) | |
| 506 ("\"o" ?,Bv(B) | |
| 507 ("\"s" ?,B_(B) | |
| 508 ("\"u" ?,B|(B) | |
| 509 ("\"\"" ?,B((B) | |
| 510 ("\" " ?\") | |
| 511 ("~A" ?,BC(B) | |
| 512 ("~C" ?,BH(B) | |
| 513 ("~D" ?,BO(B) | |
| 514 ("~L" ?,B%(B) | |
| 515 ("~N" ?,BR(B) | |
| 516 ("~O" ?,BU(B) | |
| 517 ("~R" ?,BX(B) | |
| 518 ("~S" ?,B)(B) | |
| 519 ("~T" ?,B+(B) | |
| 520 ("~U" ?,B[(B) | |
| 521 ("~Z" ?,B.(B) | |
| 522 ("~a" ?,Bc(B) | |
| 523 ("~c" ?,Bh(B) | |
| 524 ("~d" ?,Bo(B) | |
| 525 ("~l" ?,B5(B) | |
| 526 ("~n" ?,Br(B) | |
| 527 ("~o" ?,Bu(B) | |
| 528 ("~r" ?,Bx(B) | |
| 529 ("~s" ?,B9(B) | |
| 530 ("~t" ?,B;(B) | |
| 531 ("~u" ?,B{(B) | |
| 532 ("~z" ?,B>(B) | |
| 533 ("~v" ?,B"(B) | |
| 534 ("~~" ?,B"(B) | |
| 535 ("~." ?,B8(B) | |
| 536 ("~ " ?~) | |
| 537 ) | |
| 538 | |
| 539 (quail-define-package | |
|
18716
25c391385880
Change titles of quail packages.
Kenichi Handa <handa@m17n.org>
parents:
18673
diff
changeset
|
540 "latin-3-prefix" "Latin-3" "3>" t |
| 18673 | 541 "Latin-3 characters input method with prefix modifiers |
| 542 | |
| 543 effect | prefix | examples | |
| 544 ------------+--------+---------- | |
| 23470 | 545 acute | ' | 'a -> ,Ca(B '' -> ?,C4(B |
| 18673 | 546 grave | ` | `a -> ,C`(B |
| 547 circumflex | ^ | ^a -> ,Cb(B | |
| 23470 | 548 diaeresis | \" | \"a -> ,Cd(B \"\" -> ,C((B |
| 549 cedilla | ~ | ~c -> ,Cg(B ~s -> ,C:(B ~~ -> ,C8(B | |
| 550 dot above | ~ / . | ~o -> ,Cu(B /o -> ,Cu(B .o -> ,Cu(B | |
| 551 misc | \" ~ / | \"s -> ,C_(B ~g -> ,C;(B ~u -> ,C}(B /h -> ,C1(B /i -> ,C9(B | |
| 552 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
|
553 " nil t nil nil nil nil nil nil nil nil t) |
| 18673 | 554 |
| 555 (quail-define-rules | |
| 556 ("'A" ?,CA(B) | |
| 557 ("'E" ?,CI(B) | |
| 558 ("'I" ?,CM(B) | |
| 559 ("'O" ?,CS(B) | |
| 560 ("'U" ?,CZ(B) | |
| 561 ("'a" ?,Ca(B) | |
| 562 ("'e" ?,Ci(B) | |
| 563 ("'i" ?,Cm(B) | |
| 564 ("'o" ?,Cs(B) | |
| 565 ("'u" ?,Cz(B) | |
| 566 ("''" ?,C4(B) | |
| 567 ("' " ?') | |
| 568 ("`A" ?,C@(B) | |
| 569 ("`E" ?,CH(B) | |
| 570 ("`I" ?,CL(B) | |
| 571 ("`O" ?,CR(B) | |
| 572 ("`U" ?,CY(B) | |
| 573 ("`a" ?,C`(B) | |
| 574 ("`e" ?,Ch(B) | |
| 575 ("`i" ?,Cl(B) | |
| 576 ("`o" ?,Cr(B) | |
| 577 ("`u" ?,Cy(B) | |
| 578 ("``" ?`) | |
| 579 ("` " ?`) | |
| 580 ("^A" ?,CB(B) | |
| 581 ("^C" ?,CF(B) | |
| 582 ("^E" ?,CJ(B) | |
| 583 ("^G" ?,CX(B) | |
| 584 ("^H" ?,C&(B) | |
| 585 ("^I" ?,CN(B) | |
| 586 ("^J" ?,C,(B) | |
| 587 ("^O" ?,CT(B) | |
| 588 ("^S" ?,C^(B) | |
| 589 ("^U" ?,C[(B) | |
| 590 ("^a" ?,Cb(B) | |
| 591 ("^c" ?,Cf(B) | |
| 592 ("^e" ?,Cj(B) | |
| 593 ("^g" ?,Cx(B) | |
| 594 ("^h" ?,C6(B) | |
| 595 ("^i" ?,Cn(B) | |
| 596 ("^j" ?,C<(B) | |
| 597 ("^o" ?,Ct(B) | |
| 598 ("^s" ?,C~(B) | |
| 599 ("^u" ?,C{(B) | |
| 600 ("^^" ?^) | |
| 601 ("^ " ?^) | |
| 602 ("\"A" ?,CD(B) | |
| 603 ("\"E" ?,CK(B) | |
| 604 ("\"I" ?,CO(B) | |
| 605 ("\"O" ?,CV(B) | |
| 606 ("\"U" ?,C\(B) | |
| 607 ("\"a" ?,Cd(B) | |
| 608 ("\"e" ?,Ck(B) | |
| 609 ("\"i" ?,Co(B) | |
| 610 ("\"o" ?,Cv(B) | |
| 611 ("\"u" ?,C|(B) | |
| 612 ("\"s" ?,C_(B) | |
| 613 ("\"\"" ?,C((B) | |
| 614 ("\" " ?\") | |
| 615 ("~A" ?,CC(B) | |
| 616 ("~C" ?,CG(B) | |
| 617 ("~D" ?,CP(B) | |
| 618 ("~N" ?,CQ(B) | |
| 619 ("~O" ?,CU(B) | |
| 620 ("~a" ?,Cc(B) | |
| 621 ("~c" ?,Cg(B) | |
| 622 ("~d" ?,Cp(B) | |
| 623 ("~n" ?,Cq(B) | |
| 624 ("~o" ?,Cu(B) | |
| 625 ("~$" ?,C%(B) | |
| 626 ("~S" ?,C*(B) | |
| 627 ("~s" ?,C:(B) | |
| 628 ("~G" ?,C+(B) | |
| 629 ("~g" ?,C;(B) | |
| 630 ("~U" ?,C](B) | |
| 631 ("~u" ?,C}(B) | |
| 632 ("~`" ?,C"(B) | |
| 633 ("~~" ?,C8(B) | |
| 634 ("~ " ?~) | |
| 635 ("/C" ?,CE(B) | |
| 636 ("/G" ?,CU(B) | |
| 637 ("/H" ?,C!(B) | |
| 638 ("/I" ?,C)(B) | |
| 639 ("/Z" ?,C/(B) | |
| 640 ("/c" ?,Ce(B) | |
| 641 ("/g" ?,Cu(B) | |
| 642 ("/h" ?,C1(B) | |
| 643 ("/i" ?,C9(B) | |
| 644 ("/z" ?,C?(B) | |
| 645 ("/r" ?,C.(B) | |
| 646 ("/." ?,C(B) | |
| 647 ("/#" ?,C#(B) | |
| 648 ("/$" ?,C$(B) | |
| 649 ("//" ?,C0(B) | |
| 650 ("/ " ?/) | |
| 651 (".C" ?,CE(B) | |
| 652 (".G" ?,CU(B) | |
| 653 (".I" ?,C)(B) | |
| 654 (".Z" ?,C/(B) | |
| 655 (".c" ?,Ce(B) | |
| 656 (".g" ?,Cu(B) | |
| 657 (".z" ?,C?(B) | |
| 658 ) |