Mercurial > emacs
annotate leim/quail/latin-alt.el @ 73352:1504e6546638
* xdisp.c (decode_mode_spec): Ignore %c and %l constructs in frame
title.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Fri, 13 Oct 2006 14:18:09 +0000 |
| parents | 796aa8394782 |
| children | 877c366205b0 72dea2ff0142 |
| rev | line source |
|---|---|
| 42320 | 1 ;;; latin-alt.el --- Quail package for inputting various European characters -*-coding: iso-2022-7bit;-*- |
| 19901 | 2 |
|
70124
796aa8394782
updated copyright year(s)
Ramprasad B <ramprasad_i82@yahoo.com>
parents:
69954
diff
changeset
|
3 ;; Copyright (C) 1997, 1998, 2001, 2002, 2006 Free Software Foundation, Inc. |
| 69954 | 4 ;; Copyright (C) 1999 |
| 67657 | 5 ;; National Institute of Advanced Industrial Science and Technology (AIST) |
| 6 ;; Registration Number H14PRO021 | |
| 19901 | 7 |
| 8 ;; Keywords: multilingual, input method, latin | |
| 9 | |
| 10 ;; This file is part of GNU Emacs. | |
| 11 | |
| 12 ;; GNU Emacs is free software; you can redistribute it and/or modify | |
| 13 ;; it under the terms of the GNU General Public License as published by | |
| 14 ;; the Free Software Foundation; either version 2, or (at your option) | |
| 15 ;; any later version. | |
| 16 | |
| 17 ;; GNU Emacs is distributed in the hope that it will be useful, | |
| 18 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 19 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| 20 ;; GNU General Public License for more details. | |
| 21 | |
| 22 ;; You should have received a copy of the GNU General Public License | |
| 23 ;; along with GNU Emacs; see the file COPYING. If not, write to the | |
| 64083 | 24 ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
| 25 ;; Boston, MA 02110-1301, USA. | |
| 19901 | 26 |
| 27 ;; Author: TAKAHASHI Naoto <ntakahas@etl.go.jp> | |
| 28 | |
|
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
34937
diff
changeset
|
29 ;;; Commentary: |
|
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
34937
diff
changeset
|
30 |
|
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
34937
diff
changeset
|
31 ;;; Code: |
|
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
34937
diff
changeset
|
32 |
| 19901 | 33 (require 'quail) |
| 34 | |
| 35 (quail-define-package | |
| 36 "latin-1-alt-postfix" "Latin-1" "1<" t | |
| 37 "Latin-1 character input method with postfix modifiers | |
| 38 | |
| 39 | postfix | examples | |
| 40 ------------+---------+---------- | |
| 41 acute | ' | a' -> ,Aa(B | |
| 42 grave | ` | a` -> ,A`(B | |
| 43 circumflex | ^ | a^ -> ,Ab(B | |
| 44 diaeresis | \" | a\" -> ,Ad(B | |
| 45 tilde | ~ | a~ -> ,Ac(B | |
| 46 cedilla | / | c/ -> ,Ag(B | |
| 47 nordic | / | d/ -> ,Ap(B t/ -> ,A~(B a/ -> ,Ae(B e/ -> ,Af(B o/ -> ,Ax(B | |
|
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
48 others | /<> | s/ -> ,A_(B ?/ -> ,A?(B !/ -> ,A!(B |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
49 | various | << -> ,A+(B >> -> ,A;(B o_ -> ,A:(B a_ -> ,A*(B |
| 19901 | 50 |
| 51 It would be natural to use comma for cedillas, but that would be | |
| 52 inconvenient in practice because commas are needed very often after a | |
| 53 letter. | |
| 54 | |
| 55 Doubling the postfix separates the letter and postfix: e.g. a'' -> a' | |
| 56 " nil t nil nil nil nil nil nil nil nil t) | |
| 57 | |
| 58 (quail-define-rules | |
| 59 ("A`" ?,A@(B) | |
| 60 ("A'" ?,AA(B) | |
| 61 ("A^" ?,AB(B) | |
| 62 ("A~" ?,AC(B) | |
| 63 ("A\"" ?,AD(B) | |
| 64 ("A/" ?,AE(B) | |
| 65 ("a`" ?,A`(B) | |
| 66 ("a'" ?,Aa(B) | |
| 67 ("a^" ?,Ab(B) | |
| 68 ("a~" ?,Ac(B) | |
| 69 ("a\"" ?,Ad(B) | |
| 70 ("a/" ?,Ae(B) | |
| 71 ("E`" ?,AH(B) | |
| 72 ("E'" ?,AI(B) | |
| 73 ("E^" ?,AJ(B) | |
| 74 ("E\"" ?,AK(B) | |
| 75 ("E/" ?,AF(B) | |
| 76 ("e`" ?,Ah(B) | |
| 77 ("e'" ?,Ai(B) | |
| 78 ("e^" ?,Aj(B) | |
| 79 ("e\"" ?,Ak(B) | |
| 80 ("e/" ?,Af(B) | |
| 81 ("I`" ?,AL(B) | |
| 82 ("i`" ?,Al(B) | |
| 83 ("I'" ?,AM(B) | |
| 84 ("i'" ?,Am(B) | |
| 85 ("I^" ?,AN(B) | |
| 86 ("i^" ?,An(B) | |
| 87 ("I\"" ?,AO(B) | |
| 88 ("i\"" ?,Ao(B) | |
| 89 ("O`" ?,AR(B) | |
| 90 ("o`" ?,Ar(B) | |
| 91 ("O'" ?,AS(B) | |
| 92 ("o'" ?,As(B) | |
| 93 ("O^" ?,AT(B) | |
| 94 ("o^" ?,At(B) | |
| 95 ("O~" ?,AU(B) | |
| 96 ("o~" ?,Au(B) | |
| 97 ("O\"" ?,AV(B) | |
| 98 ("o\"" ?,Av(B) | |
| 99 ("O/" ?,AX(B) | |
| 100 ("o/" ?,Ax(B) | |
| 101 ("U`" ?,AY(B) | |
| 102 ("u`" ?,Ay(B) | |
| 103 ("U'" ?,AZ(B) | |
| 104 ("u'" ?,Az(B) | |
| 105 ("U^" ?,A[(B) | |
| 106 ("u^" ?,A{(B) | |
| 107 ("U\"" ?,A\(B) | |
| 108 ("u\"" ?,A|(B) | |
| 109 ("Y'" ?,A](B) | |
| 110 ("y'" ?,A}(B) | |
| 111 ("y\"" ?,A(B) | |
| 112 ("D/" ?,AP(B) | |
| 113 ("d/" ?,Ap(B) | |
| 114 ("T/" ?,A^(B) | |
| 115 ("t/" ?,A~(B) | |
| 116 ("s/" ?,A_(B) | |
| 117 ("C/" ?,AG(B) | |
| 118 ("c/" ?,Ag(B) | |
| 119 ("N~" ?,AQ(B) | |
| 120 ("n~" ?,Aq(B) | |
| 121 ("?/" ?,A?(B) | |
| 122 ("!/" ?,A!(B) | |
| 123 ("<<" ?,A+(B) | |
| 124 (">>" ?,A;(B) | |
|
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
125 ("o_" ?,A:(B) |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
126 ("a_" ?,A*(B) |
| 19901 | 127 |
| 128 ("A``" ["A`"]) | |
| 129 ("A''" ["A'"]) | |
| 130 ("A^^" ["A^"]) | |
| 131 ("A~~" ["A~"]) | |
| 132 ("A\"\"" ["A\""]) | |
| 133 ("A//" ["A/"]) | |
| 134 ("a``" ["a`"]) | |
| 135 ("a''" ["a'"]) | |
| 136 ("a^^" ["a^"]) | |
| 137 ("a~~" ["a~"]) | |
| 138 ("a\"\"" ["a\""]) | |
| 139 ("a//" ["a/"]) | |
| 140 ("E``" ["E`"]) | |
| 141 ("E''" ["E'"]) | |
| 142 ("E^^" ["E^"]) | |
| 143 ("E\"\"" ["E\""]) | |
| 144 ("E//" ["E/"]) | |
| 145 ("e``" ["e`"]) | |
| 146 ("e''" ["e'"]) | |
| 147 ("e^^" ["e^"]) | |
| 148 ("e\"\"" ["e\""]) | |
| 149 ("e//" ["e/"]) | |
| 150 ("I``" ["I`"]) | |
| 151 ("i``" ["i`"]) | |
| 152 ("I''" ["I'"]) | |
| 153 ("i''" ["i'"]) | |
| 154 ("I^^" ["I^"]) | |
| 155 ("i^^" ["i^"]) | |
| 156 ("I\"\"" ["I\""]) | |
| 157 ("i\"\"" ["i\""]) | |
| 158 ("O``" ["O`"]) | |
| 159 ("o``" ["o`"]) | |
| 160 ("O''" ["O'"]) | |
| 161 ("o''" ["o'"]) | |
| 162 ("O^^" ["O^"]) | |
| 163 ("o^^" ["o^"]) | |
| 164 ("O~~" ["O~"]) | |
| 165 ("o~~" ["o~"]) | |
| 166 ("O\"\"" ["O\""]) | |
| 167 ("o\"\"" ["o\""]) | |
| 168 ("O//" ["O/"]) | |
| 169 ("o//" ["o/"]) | |
| 170 ("U``" ["U`"]) | |
| 171 ("u``" ["u`"]) | |
| 172 ("U''" ["U'"]) | |
| 173 ("u''" ["u'"]) | |
| 174 ("U^^" ["U^"]) | |
| 175 ("u^^" ["u^"]) | |
| 176 ("U\"\"" ["U\""]) | |
| 177 ("u\"\"" ["u\""]) | |
| 178 ("Y''" ["Y'"]) | |
| 179 ("y''" ["y'"]) | |
| 180 ("y\"\"" ["y\""]) | |
| 181 ("D//" ["D/"]) | |
| 182 ("d//" ["d/"]) | |
| 183 ("T//" ["T/"]) | |
| 184 ("t//" ["t/"]) | |
| 185 ("s//" ["s/"]) | |
| 186 ("C//" ["C/"]) | |
| 187 ("c//" ["c/"]) | |
| 188 ("N~~" ["N~"]) | |
| 189 ("n~~" ["n~"]) | |
| 190 ("?//" ["?/"]) | |
| 191 ("!//" ["!/"]) | |
| 192 ("<<<" ["<<"]) | |
| 193 (">>>" [">>"]) | |
|
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
194 ("o__" ["o_"]) |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
195 ("a__" ["a_"]) |
| 19901 | 196 ) |
| 197 | |
| 198 (quail-define-package | |
| 199 "latin-2-alt-postfix" "Latin-2" "2<" t | |
| 200 "Latin-2 character input method with postfix modifiers | |
| 201 | |
| 202 | postfix | examples | |
| 203 ------------+---------+---------- | |
| 204 acute | ' | a' -> ,Ba(B | |
| 205 ogonek | ` | a` -> ,B1(B | |
| 206 diaeresis | \" | a\" -> ,Bd(B | |
| 207 circumflex | ^ | a^ -> ,Bb(B | |
| 208 breve | ~ | a~ -> ,Bc(B | |
| 209 cedilla | ` | c` -> ,Bg(B | |
| 210 caron | ~ | c~ -> ,Bh(B | |
|
21507
8b9dd332ccf1
(latin-2-alt-postfix): Doc fix.
Andreas Schwab <schwab@suse.de>
parents:
19940
diff
changeset
|
211 dbl. acute | : | o: -> ,Bu(B |
| 19901 | 212 ring | ` | u` -> ,By(B |
| 213 dot | ` | z` -> ,B?(B | |
| 214 stroke | / | d/ -> ,Bp(B | |
| 215 others | / | s/ -> ,B_(B | |
| 216 | |
| 217 It would be natural to use period and comma for dots/rings and | |
| 218 cedillas/ogoneks, but that would inconvenient in practice, because | |
| 219 periods and commas are needed very often after a letter. | |
| 220 | |
| 221 Doubling the postfix separates the letter and postfix: e.g. a'' -> a' | |
| 222 " nil t nil nil nil nil nil nil nil nil t) | |
| 223 | |
| 224 (quail-define-rules | |
| 225 ("A'" ?,BA(B) | |
| 226 ("A`" ?,B!(B) | |
| 227 ("A\"" ?,BD(B) | |
| 228 ("A^" ?,BB(B) | |
| 229 ("A~" ?,BC(B) | |
| 230 ("C'" ?,BF(B) | |
| 231 ("C`" ?,BG(B) | |
| 232 ("C~" ?,BH(B) | |
| 233 ("D/" ?,BP(B) | |
| 234 ("D~" ?,BO(B) | |
| 235 ("E'" ?,BI(B) | |
| 236 ("E`" ?,BJ(B) | |
| 237 ("E\"" ?,BK(B) | |
| 238 ("E~" ?,BL(B) | |
| 239 ("I'" ?,BM(B) | |
| 240 ("I^" ?,BN(B) | |
| 241 ("L'" ?,BE(B) | |
| 242 ("L/" ?,B#(B) | |
| 243 ("L~" ?,B%(B) | |
| 244 ("N'" ?,BQ(B) | |
| 245 ("N~" ?,BR(B) | |
| 246 ("O'" ?,BS(B) | |
|
19940
ba2ea2a6386a
(latin-2-postfix): Use : for double-acute again.
Richard M. Stallman <rms@gnu.org>
parents:
19901
diff
changeset
|
247 ("O:" ?,BU(B) |
| 19901 | 248 ("O\"" ?,BV(B) |
| 249 ("O^" ?,BT(B) | |
| 250 ("R'" ?,B@(B) | |
| 251 ("R~" ?,BX(B) | |
| 252 ("S'" ?,B&(B) | |
| 253 ("S`" ?,B*(B) | |
| 254 ("S~" ?,B)(B) | |
| 255 ("T`" ?,B^(B) | |
| 256 ("T~" ?,B+(B) | |
| 257 ("U'" ?,BZ(B) | |
|
19940
ba2ea2a6386a
(latin-2-postfix): Use : for double-acute again.
Richard M. Stallman <rms@gnu.org>
parents:
19901
diff
changeset
|
258 ("U:" ?,B[(B) |
| 19901 | 259 ("U\"" ?,B\(B) |
| 260 ("U`" ?,BY(B) | |
| 261 ("Y'" ?,B](B) | |
| 262 ("Z'" ?,B,(B) | |
| 263 ("Z`" ?,B/(B) | |
| 264 ("Z~" ?,B.(B) | |
| 265 ("a'" ?,Ba(B) | |
| 266 ("a`" ?,B1(B) | |
| 267 ("a\"" ?,Bd(B) | |
| 268 ("a^" ?,Bb(B) | |
| 269 ("a~" ?,Bc(B) | |
| 270 ("c'" ?,Bf(B) | |
| 271 ("c`" ?,Bg(B) | |
| 272 ("c~" ?,Bh(B) | |
| 273 ("d/" ?,Bp(B) | |
| 274 ("d~" ?,Bo(B) | |
| 275 ("e'" ?,Bi(B) | |
| 276 ("e`" ?,Bj(B) | |
| 277 ("e\"" ?,Bk(B) | |
| 278 ("e~" ?,Bl(B) | |
| 279 ("i'" ?,Bm(B) | |
| 280 ("i^" ?,Bn(B) | |
| 281 ("l'" ?,Be(B) | |
| 282 ("l/" ?,B3(B) | |
| 283 ("l~" ?,B5(B) | |
| 284 ("n'" ?,Bq(B) | |
| 285 ("n~" ?,Br(B) | |
| 286 ("o'" ?,Bs(B) | |
|
19940
ba2ea2a6386a
(latin-2-postfix): Use : for double-acute again.
Richard M. Stallman <rms@gnu.org>
parents:
19901
diff
changeset
|
287 ("o:" ?,Bu(B) |
| 19901 | 288 ("o\"" ?,Bv(B) |
| 289 ("o^" ?,Bt(B) | |
| 290 ("r'" ?,B`(B) | |
| 291 ("r~" ?,Bx(B) | |
| 292 ("s'" ?,B6(B) | |
| 293 ("s`" ?,B:(B) | |
| 294 ("s/" ?,B_(B) | |
| 295 ("s~" ?,B9(B) | |
| 296 ("t`" ?,B~(B) | |
| 297 ("t~" ?,B;(B) | |
| 298 ("u'" ?,Bz(B) | |
|
19940
ba2ea2a6386a
(latin-2-postfix): Use : for double-acute again.
Richard M. Stallman <rms@gnu.org>
parents:
19901
diff
changeset
|
299 ("u:" ?,B{(B) |
| 19901 | 300 ("u\"" ?,B|(B) |
| 301 ("u`" ?,By(B) | |
| 302 ("y'" ?,B}(B) | |
| 303 ("z'" ?,B<(B) | |
| 304 ("z`" ?,B?(B) | |
| 305 ("z~" ?,B>(B) | |
| 306 | |
| 307 ("A''" ["A'"]) | |
| 308 ("A``" ["A`"]) | |
| 309 ("A\"\"" ["A\""]) | |
| 310 ("A^^" ["A^"]) | |
| 311 ("A~~" ["A~"]) | |
| 312 ("C''" ["C'"]) | |
| 313 ("C``" ["C`"]) | |
| 314 ("C~~" ["C~"]) | |
| 315 ("D//" ["D/"]) | |
| 316 ("D~~" ["D~"]) | |
| 317 ("E''" ["E'"]) | |
| 318 ("E``" ["E`"]) | |
| 319 ("E\"\"" ["E\""]) | |
| 320 ("E~~" ["E~"]) | |
| 321 ("I''" ["I'"]) | |
| 322 ("I^^" ["I^"]) | |
| 323 ("L''" ["L'"]) | |
| 324 ("L//" ["L/"]) | |
| 325 ("L~~" ["L~"]) | |
| 326 ("N''" ["N'"]) | |
| 327 ("N~~" ["N~"]) | |
| 328 ("O''" ["O'"]) | |
| 329 ("O::" ["O:"]) | |
| 330 ("O\"\"" ["O\""]) | |
| 331 ("O^^" ["O^"]) | |
| 332 ("R''" ["R'"]) | |
| 333 ("R~~" ["R~"]) | |
| 334 ("S''" ["S'"]) | |
| 335 ("S``" ["S`"]) | |
| 336 ("S~~" ["S~"]) | |
| 337 ("T``" ["T`"]) | |
| 338 ("T~~" ["T~"]) | |
| 339 ("U''" ["U'"]) | |
| 340 ("U::" ["U:"]) | |
| 341 ("U\"\"" ["U\""]) | |
| 342 ("U``" ["U`"]) | |
| 343 ("Y''" ["Y'"]) | |
| 344 ("Z''" ["Z'"]) | |
| 345 ("Z``" ["Z`"]) | |
| 346 ("Z~~" ["Z~"]) | |
| 347 ("a''" ["a'"]) | |
| 348 ("a``" ["a`"]) | |
| 349 ("a\"\"" ["a\""]) | |
| 350 ("a^^" ["a^"]) | |
| 351 ("a~~" ["a~"]) | |
| 352 ("c''" ["c'"]) | |
| 353 ("c``" ["c`"]) | |
| 354 ("c~~" ["c~"]) | |
| 355 ("d//" ["d/"]) | |
| 356 ("d~~" ["d~"]) | |
| 357 ("e''" ["e'"]) | |
| 358 ("e``" ["e`"]) | |
| 359 ("e\"\"" ["e\""]) | |
| 360 ("e~~" ["e~"]) | |
| 361 ("i''" ["i'"]) | |
| 362 ("i^^" ["i^"]) | |
| 363 ("l''" ["l'"]) | |
| 364 ("l//" ["l/"]) | |
| 365 ("l~~" ["l~"]) | |
| 366 ("n''" ["n'"]) | |
| 367 ("n~~" ["n~"]) | |
| 368 ("o''" ["o'"]) | |
| 369 ("o::" ["o:"]) | |
| 370 ("o\"\"" ["o\""]) | |
| 371 ("o^^" ["o^"]) | |
| 372 ("r''" ["r'"]) | |
| 373 ("r~~" ["r~"]) | |
| 374 ("s''" ["s'"]) | |
| 375 ("s``" ["s`"]) | |
| 376 ("s//" ["s/"]) | |
| 377 ("s~~" ["s~"]) | |
| 378 ("t``" ["t`"]) | |
| 379 ("t~~" ["t~"]) | |
| 380 ("u''" ["u'"]) | |
| 381 ("u::" ["u:"]) | |
| 382 ("u\"\"" ["u\""]) | |
| 383 ("u``" ["u`"]) | |
| 384 ("y''" ["y'"]) | |
| 385 ("z''" ["z'"]) | |
| 386 ("z``" ["z`"]) | |
| 387 ("z~~" ["z~"]) | |
| 388 ) | |
| 389 | |
| 390 (quail-define-package | |
| 391 "latin-3-alt-postfix" "Latin-3" "3<" t | |
| 392 "Latin-3 character input method with postfix modifiers | |
| 393 | |
| 394 | postfix | examples | |
| 395 ------------+---------+---------- | |
| 396 acute | ' | a' -> ,Ca(B | |
| 397 grave | ` | a` -> ,C`(B | |
| 398 circumflex | ^ | a^ -> ,Cb(B | |
| 399 diaeresis | \" | a\" -> ,Cd(B | |
| 400 dot | / | c/ -> ,Ce(B i/ -> ,C9(B I/ -> ,C)(B | |
| 401 cedilla | ` | c` -> ,Cg(B | |
| 402 breve | ~ | g~ -> ,C;(B | |
| 403 tilde | ~ | n~ -> ,Cq(B | |
| 404 stroke | / | h/ -> ,C1(B | |
| 405 others | / | s/ -> ,C_(B | |
| 406 | |
| 407 It would be natural to use period and comma for dots and cedillas, but | |
| 408 that would inconvenient in practice, because periods and commas are | |
| 409 needed very often after a letter. | |
| 410 | |
| 411 Doubling the postfix separates the letter and postfix: e.g. a'' -> a' | |
| 412 " nil t nil nil nil nil nil nil nil nil t) | |
| 413 | |
| 414 (quail-define-rules | |
| 415 ("A`" ?,C@(B) | |
| 416 ("A'" ?,CA(B) | |
| 417 ("A^" ?,CB(B) | |
| 418 ("A\"" ?,CD(B) | |
| 419 ("C/" ?,CE(B) | |
| 420 ("C^" ?,CF(B) | |
| 421 ("C`" ?,CG(B) | |
| 422 ("E`" ?,CH(B) | |
| 423 ("E'" ?,CI(B) | |
| 424 ("E^" ?,CJ(B) | |
| 425 ("E\"" ?,CK(B) | |
| 426 ("G~" ?,C+(B) | |
| 427 ("G/" ?,CU(B) | |
| 428 ("G^" ?,CX(B) | |
| 429 ("H/" ?,C!(B) | |
| 430 ("H^" ?,C&(B) | |
| 431 ("I/" ?,C)(B) | |
| 432 ("I`" ?,CL(B) | |
| 433 ("I'" ?,CM(B) | |
| 434 ("I^" ?,CN(B) | |
| 435 ("I\"" ?,CO(B) | |
| 436 ("J^" ?,C,(B) | |
| 437 ("N~" ?,CQ(B) | |
| 438 ("O`" ?,CR(B) | |
| 439 ("O'" ?,CS(B) | |
| 440 ("O^" ?,CT(B) | |
| 441 ("O\"" ?,CV(B) | |
| 442 ("S`" ?,C*(B) | |
| 443 ("S^" ?,C^(B) | |
| 444 ("U`" ?,CY(B) | |
| 445 ("U'" ?,CZ(B) | |
| 446 ("U^" ?,C[(B) | |
| 447 ("U\"" ?,C\(B) | |
| 448 ("U~" ?,C](B) | |
| 449 ("Z/" ?,C/(B) | |
| 450 ("a`" ?,C`(B) | |
| 451 ("a'" ?,Ca(B) | |
| 452 ("a^" ?,Cb(B) | |
| 453 ("a\"" ?,Cd(B) | |
| 454 ("c/" ?,Ce(B) | |
| 455 ("c^" ?,Cf(B) | |
| 456 ("c`" ?,Cg(B) | |
| 457 ("e`" ?,Ch(B) | |
| 458 ("e'" ?,Ci(B) | |
| 459 ("e^" ?,Cj(B) | |
| 460 ("e\"" ?,Ck(B) | |
| 461 ("g~" ?,C;(B) | |
| 462 ("g/" ?,Cu(B) | |
| 463 ("g^" ?,Cx(B) | |
| 464 ("h/" ?,C1(B) | |
| 465 ("h^" ?,C6(B) | |
| 466 ("i/" ?,C9(B) | |
| 467 ("i`" ?,Cl(B) | |
| 468 ("i'" ?,Cm(B) | |
| 469 ("i^" ?,Cn(B) | |
| 470 ("i\"" ?,Co(B) | |
| 471 ("j^" ?,C<(B) | |
| 472 ("n~" ?,Cq(B) | |
| 473 ("o`" ?,Cr(B) | |
| 474 ("o'" ?,Cs(B) | |
| 475 ("o^" ?,Ct(B) | |
| 476 ("o\"" ?,Cv(B) | |
| 477 ("s`" ?,C:(B) | |
| 478 ("s/" ?,C_(B) | |
| 479 ("s^" ?,C~(B) | |
| 480 ("u`" ?,Cy(B) | |
| 481 ("u'" ?,Cz(B) | |
| 482 ("u^" ?,C{(B) | |
| 483 ("u\"" ?,C|(B) | |
| 484 ("u~" ?,C}(B) | |
| 485 ("z/" ?,C?(B) | |
| 486 | |
| 487 ("A``" ["A`"]) | |
| 488 ("A''" ["A'"]) | |
| 489 ("A^^" ["A^"]) | |
| 490 ("A\"\"" ["A\""]) | |
| 491 ("C//" ["C/"]) | |
| 492 ("C^^" ["C^"]) | |
| 493 ("C``" ["C`"]) | |
| 494 ("E``" ["E`"]) | |
| 495 ("E''" ["E'"]) | |
| 496 ("E^^" ["E^"]) | |
| 497 ("E\"\"" ["E\""]) | |
| 498 ("G~~" ["G~"]) | |
| 499 ("G//" ["G/"]) | |
| 500 ("G^^" ["G^"]) | |
| 501 ("H//" ["H/"]) | |
| 502 ("H^^" ["H^"]) | |
| 503 ("I//" ["I/"]) | |
| 504 ("I``" ["I`"]) | |
| 505 ("I''" ["I'"]) | |
| 506 ("I^^" ["I^"]) | |
| 507 ("I\"\"" ["I\""]) | |
| 508 ("J^^" ["J^"]) | |
| 509 ("N~~" ["N~"]) | |
| 510 ("O``" ["O`"]) | |
| 511 ("O''" ["O'"]) | |
| 512 ("O^^" ["O^"]) | |
| 513 ("O\"\"" ["O\""]) | |
| 514 ("S``" ["S`"]) | |
| 515 ("S^^" ["S^"]) | |
| 516 ("U``" ["U`"]) | |
| 517 ("U''" ["U'"]) | |
| 518 ("U^^" ["U^"]) | |
| 519 ("U\"\"" ["U\""]) | |
| 520 ("U~~" ["U~"]) | |
| 521 ("Z//" ["Z/"]) | |
| 522 ("a``" ["a`"]) | |
| 523 ("a''" ["a'"]) | |
| 524 ("a^^" ["a^"]) | |
| 525 ("a\"\"" ["a\""]) | |
| 526 ("c//" ["c/"]) | |
| 527 ("c^^" ["c^"]) | |
| 528 ("c``" ["c`"]) | |
| 529 ("e``" ["e`"]) | |
| 530 ("e''" ["e'"]) | |
| 531 ("e^^" ["e^"]) | |
| 532 ("e\"\"" ["e\""]) | |
| 533 ("g~~" ["g~"]) | |
| 534 ("g//" ["g/"]) | |
| 535 ("g^^" ["g^"]) | |
| 536 ("h//" ["h/"]) | |
| 537 ("h^^" ["h^"]) | |
| 538 ("i//" ["i/"]) | |
| 539 ("i``" ["i`"]) | |
| 540 ("i''" ["i'"]) | |
| 541 ("i^^" ["i^"]) | |
| 542 ("i\"\"" ["i\""]) | |
| 543 ("j^^" ["j^"]) | |
| 544 ("n~~" ["n~"]) | |
| 545 ("o``" ["o`"]) | |
| 546 ("o''" ["o'"]) | |
| 547 ("o^^" ["o^"]) | |
| 548 ("o\"\"" ["o\""]) | |
| 549 ("s``" ["s`"]) | |
| 550 ("s//" ["s/"]) | |
| 551 ("s^^" ["s^"]) | |
| 552 ("u``" ["u`"]) | |
| 553 ("u''" ["u'"]) | |
| 554 ("u^^" ["u^"]) | |
| 555 ("u\"\"" ["u\""]) | |
| 556 ("u~~" ["u~"]) | |
| 557 ("z//" ["z/"]) | |
| 558 ) | |
| 559 | |
| 560 (quail-define-package | |
| 561 "latin-4-alt-postfix" "Latin-4" "4<" t | |
| 562 "Latin-4 characters input method with postfix modifiers | |
| 563 | |
| 564 | postfix | examples | |
| 565 ------------+---------+---------- | |
| 566 acute | ' | a' -> ,Da(B | |
| 567 circumflex | ^ | a^ -> ,Db(B | |
| 568 diaeresis | \" | a\" -> ,Dd(B | |
| 569 ogonek | ` | a` -> ,D1(B | |
| 570 macron | - | a- -> ,D`(B | |
| 571 tilde | ~ | a~ -> ,Dc(B | |
| 572 caron | ~ | c~ -> ,Dh(B | |
| 573 dot | ~ | e~ -> ,Dl(B | |
| 574 cedilla | ` | k` -> ,Ds(B g` -> ,D;(B | |
| 575 stroke | / | d/ -> ,Dp(B | |
| 576 nordic | / | a/ -> ,De(B e/ -> ,Df(B o/ -> ,Dx(B | |
| 577 others | / | s/ -> ,D_(B n/ -> ,D?(B k/ -> ,D"(B | |
| 578 | |
| 579 It would be natural to use period and comma for dots and | |
| 580 cedillas/ogoneks, but that would inconvenient in practice, because | |
| 581 periods and commas are needed very often after a letter. | |
| 582 | |
| 583 Doubling the postfix separates the letter and postfix: e.g. a'' -> a' | |
| 584 " nil t nil nil nil nil nil nil nil nil t) | |
| 585 | |
| 586 (quail-define-rules | |
| 587 ("A`" ?,D!(B) | |
| 588 ("A-" ?,D@(B) | |
| 589 ("A'" ?,DA(B) | |
| 590 ("A^" ?,DB(B) | |
| 591 ("A~" ?,DC(B) | |
| 592 ("A\"" ?,DD(B) | |
| 593 ("A/" ?,DE(B) | |
| 594 ("C~" ?,DH(B) | |
| 595 ("D/" ?,DP(B) | |
| 596 ("E/" ?,DF(B) | |
| 597 ("E-" ?,D*(B) | |
| 598 ("E'" ?,DI(B) | |
| 599 ("E`" ?,DJ(B) | |
| 600 ("E\"" ?,DK(B) | |
| 601 ("E~" ?,DL(B) | |
| 602 ("G`" ?,D+(B) | |
| 603 ("I~" ?,D%(B) | |
| 604 ("I`" ?,DG(B) | |
| 605 ("I'" ?,DM(B) | |
| 606 ("I^" ?,DN(B) | |
| 607 ("I-" ?,DO(B) | |
| 608 ("K`" ?,DS(B) | |
| 609 ("L`" ?,D&(B) | |
| 610 ("N/" ?,D=(B) | |
| 611 ("N`" ?,DQ(B) | |
| 612 ("O-" ?,DR(B) | |
| 613 ("O^" ?,DT(B) | |
| 614 ("O~" ?,DU(B) | |
| 615 ("O\"" ?,DV(B) | |
| 616 ("O/" ?,DX(B) | |
| 617 ("R`" ?,D#(B) | |
| 618 ("S~" ?,D)(B) | |
| 619 ("T/" ?,D,(B) | |
| 620 ("U`" ?,DY(B) | |
| 621 ("U'" ?,DZ(B) | |
| 622 ("U^" ?,D[(B) | |
| 623 ("U\"" ?,D\(B) | |
| 624 ("U~" ?,D](B) | |
| 625 ("U-" ?,D^(B) | |
| 626 ("Z~" ?,D.(B) | |
| 627 ("a`" ?,D1(B) | |
| 628 ("a-" ?,D`(B) | |
| 629 ("a'" ?,Da(B) | |
| 630 ("a^" ?,Db(B) | |
| 631 ("a~" ?,Dc(B) | |
| 632 ("a\"" ?,Dd(B) | |
| 633 ("a/" ?,De(B) | |
| 634 ("c~" ?,Dh(B) | |
| 635 ("d/" ?,Dp(B) | |
| 636 ("e/" ?,Df(B) | |
| 637 ("e-" ?,D:(B) | |
| 638 ("e'" ?,Di(B) | |
| 639 ("e`" ?,Dj(B) | |
| 640 ("e\"" ?,Dk(B) | |
| 641 ("e~" ?,Dl(B) | |
| 642 ("g`" ?,D;(B) | |
| 643 ("i~" ?,D5(B) | |
| 644 ("i`" ?,Dg(B) | |
| 645 ("i'" ?,Dm(B) | |
| 646 ("i^" ?,Dn(B) | |
| 647 ("i-" ?,Do(B) | |
| 648 ("k/" ?,D"(B) | |
| 649 ("k`" ?,Ds(B) | |
| 650 ("l`" ?,D6(B) | |
| 651 ("n/" ?,D?(B) | |
| 652 ("n`" ?,Dq(B) | |
| 653 ("o-" ?,Dr(B) | |
| 654 ("o^" ?,Dt(B) | |
| 655 ("o~" ?,Du(B) | |
| 656 ("o\"" ?,Dv(B) | |
| 657 ("o/" ?,Dx(B) | |
| 658 ("r`" ?,D3(B) | |
| 659 ("s/" ?,D_(B) | |
| 660 ("s~" ?,D9(B) | |
| 661 ("t/" ?,D<(B) | |
| 662 ("u`" ?,Dy(B) | |
| 663 ("u'" ?,Dz(B) | |
| 664 ("u^" ?,D{(B) | |
| 665 ("u\"" ?,D|(B) | |
| 666 ("u~" ?,D}(B) | |
| 667 ("u-" ?,D~(B) | |
| 668 ("z~" ?,D>(B) | |
| 669 | |
| 670 ("A``" ["A`"]) | |
| 671 ("A--" ["A-"]) | |
| 672 ("A''" ["A'"]) | |
| 673 ("A^^" ["A^"]) | |
| 674 ("A~~" ["A~"]) | |
| 675 ("A\"\"" ["A\""]) | |
| 676 ("A//" ["A/"]) | |
| 677 ("C~~" ["C~"]) | |
| 678 ("D//" ["D/"]) | |
| 679 ("E//" ["E/"]) | |
| 680 ("E--" ["E-"]) | |
| 681 ("E''" ["E'"]) | |
| 682 ("E``" ["E`"]) | |
| 683 ("E\"\"" ["E\""]) | |
| 684 ("E~~" ["E~"]) | |
| 685 ("G``" ["G`"]) | |
| 686 ("I~~" ["I~"]) | |
| 687 ("I``" ["I`"]) | |
| 688 ("I''" ["I'"]) | |
| 689 ("I^^" ["I^"]) | |
| 690 ("I--" ["I-"]) | |
| 691 ("K``" ["K`"]) | |
| 692 ("L``" ["L`"]) | |
| 693 ("N//" ["N/"]) | |
| 694 ("N``" ["N`"]) | |
| 695 ("O--" ["O-"]) | |
| 696 ("O^^" ["O^"]) | |
| 697 ("O~~" ["O~"]) | |
| 698 ("O\"\"" ["O\""]) | |
| 699 ("O//" ["O/"]) | |
| 700 ("R``" ["R`"]) | |
| 701 ("S~~" ["S~"]) | |
| 702 ("T//" ["T/"]) | |
| 703 ("U``" ["U`"]) | |
| 704 ("U''" ["U'"]) | |
| 705 ("U^^" ["U^"]) | |
| 706 ("U\"\"" ["U\""]) | |
| 707 ("U~~" ["U~"]) | |
| 708 ("U--" ["U-"]) | |
| 709 ("Z~~" ["Z~"]) | |
| 710 ("a``" ["a`"]) | |
| 711 ("a--" ["a-"]) | |
| 712 ("a''" ["a'"]) | |
| 713 ("a^^" ["a^"]) | |
| 714 ("a~~" ["a~"]) | |
| 715 ("a\"\"" ["a\""]) | |
| 716 ("a//" ["a/"]) | |
| 717 ("c~~" ["c~"]) | |
| 718 ("d//" ["d/"]) | |
| 719 ("e//" ["e/"]) | |
| 720 ("e--" ["e-"]) | |
| 721 ("e''" ["e'"]) | |
| 722 ("e``" ["e`"]) | |
| 723 ("e\"\"" ["e\""]) | |
| 724 ("e~~" ["e~"]) | |
| 725 ("g``" ["g`"]) | |
| 726 ("i~~" ["i~"]) | |
| 727 ("i``" ["i`"]) | |
| 728 ("i''" ["i'"]) | |
| 729 ("i^^" ["i^"]) | |
| 730 ("i--" ["i-"]) | |
| 731 ("k//" ["k/"]) | |
| 732 ("k``" ["k`"]) | |
| 733 ("l``" ["l`"]) | |
| 734 ("n//" ["n/"]) | |
| 735 ("n``" ["n`"]) | |
| 736 ("o--" ["o-"]) | |
| 737 ("o^^" ["o^"]) | |
| 738 ("o~~" ["o~"]) | |
| 739 ("o\"\"" ["o\""]) | |
| 740 ("o//" ["o/"]) | |
| 741 ("r``" ["r`"]) | |
| 742 ("s//" ["s/"]) | |
| 743 ("s~~" ["s~"]) | |
| 744 ("t//" ["t/"]) | |
| 745 ("u``" ["u`"]) | |
| 746 ("u''" ["u'"]) | |
| 747 ("u^^" ["u^"]) | |
| 748 ("u\"\"" ["u\""]) | |
| 749 ("u~~" ["u~"]) | |
| 750 ("u--" ["u-"]) | |
| 751 ("z~~" ["z~"]) | |
| 752 ) | |
| 753 | |
| 754 (quail-define-package | |
| 755 "latin-5-alt-postfix" "Latin-5" "5<" t | |
| 756 "Latin-5 characters input method with postfix modifiers | |
| 757 | |
| 758 | postfix | examples | |
| 759 ------------+---------+---------- | |
| 760 acute | ' | a' -> ,Ma(B | |
| 761 grave | ` | a` -> ,M`(B | |
| 762 circumflex | ^ | a^ -> ,Mb(B | |
| 763 diaeresis | \" | a\" -> ,Md(B | |
| 764 tilde | ~ | a~ -> ,Mc(B | |
| 765 breve | ~ | g~ -> ,Mp(B | |
| 766 cedilla | ` | c` -> ,Mg(B | |
| 767 dot | / | i/ -> ,M}(B I/ -> ,M](B | |
| 768 nordic | / | a/ -> ,Me(B e/ -> ,Mf(B o/ -> ,Mx(B | |
| 769 others | / | s/ -> ,M_(B | |
| 770 | |
| 771 It would be natural to use period and comma for dots and cedillas, but | |
| 772 that would inconvenient in practice, because periods and commas are | |
| 773 needed very often after a letter. | |
| 774 | |
| 775 Doubling the postfix separates the letter and postfix: e.g. a'' -> a' | |
| 776 " nil t nil nil nil nil nil nil nil nil t) | |
| 777 | |
| 778 (quail-define-rules | |
| 779 ("A'" ?,MA(B) | |
| 780 ("A/" ?,ME(B) | |
| 781 ("A\"" ?,MD(B) | |
| 782 ("A^" ?,MB(B) | |
| 783 ("A`" ?,M@(B) | |
| 784 ("A~" ?,MC(B) | |
| 785 ("C`" ?,MG(B) | |
| 786 ("E'" ?,MI(B) | |
| 787 ("E/" ?,MF(B) | |
| 788 ("E\"" ?,MK(B) | |
| 789 ("E^" ?,MJ(B) | |
| 790 ("E`" ?,MH(B) | |
| 791 ("G~" ?,MP(B) | |
| 792 ("I'" ?,MM(B) | |
| 793 ("I/" ?,M](B) | |
| 794 ("I\"" ?,MO(B) | |
| 795 ("I^" ?,MN(B) | |
| 796 ("I`" ?,ML(B) | |
| 797 ("N~" ?,MQ(B) | |
| 798 ("O'" ?,MS(B) | |
| 799 ("O/" ?,MX(B) | |
| 800 ("O\"" ?,MV(B) | |
| 801 ("O^" ?,MT(B) | |
| 802 ("O`" ?,MR(B) | |
| 803 ("O~" ?,MU(B) | |
| 804 ("S`" ?,M^(B) | |
| 805 ("U'" ?,MZ(B) | |
| 806 ("U\"" ?,M\(B) | |
| 807 ("U^" ?,M[(B) | |
| 808 ("U`" ?,MY(B) | |
| 809 ("a'" ?,Ma(B) | |
| 810 ("a/" ?,Me(B) | |
| 811 ("a\"" ?,Md(B) | |
| 812 ("a^" ?,Mb(B) | |
| 813 ("a`" ?,M`(B) | |
| 814 ("a~" ?,Mc(B) | |
| 815 ("c`" ?,Mg(B) | |
| 816 ("e'" ?,Mi(B) | |
| 817 ("e/" ?,Mf(B) | |
| 818 ("e\"" ?,Mk(B) | |
| 819 ("e^" ?,Mj(B) | |
| 820 ("e`" ?,Mh(B) | |
| 821 ("g~" ?,Mp(B) | |
| 822 ("i'" ?,Mm(B) | |
| 823 ("i/" ?,M}(B) | |
| 824 ("i\"" ?,Mo(B) | |
| 825 ("i^" ?,Mn(B) | |
| 826 ("i`" ?,Ml(B) | |
| 827 ("n~" ?,Mq(B) | |
| 828 ("o'" ?,Ms(B) | |
| 829 ("o/" ?,Mx(B) | |
| 830 ("o\"" ?,Mv(B) | |
| 831 ("o^" ?,Mt(B) | |
| 832 ("o`" ?,Mr(B) | |
| 833 ("o~" ?,Mu(B) | |
| 834 ("s`" ?,M~(B) | |
| 835 ("s/" ?,M_(B) | |
| 836 ("u'" ?,Mz(B) | |
| 837 ("u\"" ?,M|(B) | |
| 838 ("u^" ?,M{(B) | |
| 839 ("u`" ?,My(B) | |
| 840 ("y\"" ?,M(B) | |
| 841 | |
| 842 ("A''" ["A'"]) | |
| 843 ("A//" ["A/"]) | |
| 844 ("A\"\"" ["A\""]) | |
| 845 ("A^^" ["A^"]) | |
| 846 ("A``" ["A`"]) | |
| 847 ("A~~" ["A~"]) | |
| 848 ("C``" ["C`"]) | |
| 849 ("E''" ["E'"]) | |
| 850 ("E//" ["E/"]) | |
| 851 ("E\"\"" ["E\""]) | |
| 852 ("E^^" ["E^"]) | |
| 853 ("E``" ["E`"]) | |
| 854 ("G~~" ["G~"]) | |
| 855 ("I''" ["I'"]) | |
| 856 ("I//" ["I/"]) | |
| 857 ("I\"\"" ["I\""]) | |
| 858 ("I^^" ["I^"]) | |
| 859 ("I``" ["I`"]) | |
| 860 ("N~~" ["N~"]) | |
| 861 ("O''" ["O'"]) | |
| 862 ("O//" ["O/"]) | |
| 863 ("O\"\"" ["O\""]) | |
| 864 ("O^^" ["O^"]) | |
| 865 ("O``" ["O`"]) | |
| 866 ("O~~" ["O~"]) | |
| 867 ("S``" ["S`"]) | |
| 868 ("U''" ["U'"]) | |
| 869 ("U\"\"" ["U\""]) | |
| 870 ("U^^" ["U^"]) | |
| 871 ("U``" ["U`"]) | |
| 872 ("a''" ["a'"]) | |
| 873 ("a//" ["a/"]) | |
| 874 ("a\"\"" ["a\""]) | |
| 875 ("a^^" ["a^"]) | |
| 876 ("a``" ["a`"]) | |
| 877 ("a~~" ["a~"]) | |
| 878 ("c``" ["c`"]) | |
| 879 ("e''" ["e'"]) | |
| 880 ("e//" ["e/"]) | |
| 881 ("e\"\"" ["e\""]) | |
| 882 ("e^^" ["e^"]) | |
| 883 ("e``" ["e`"]) | |
| 884 ("g~~" ["g~"]) | |
| 885 ("i''" ["i'"]) | |
| 886 ("i//" ["i/"]) | |
| 887 ("i\"\"" ["i\""]) | |
| 888 ("i^^" ["i^"]) | |
| 889 ("i``" ["i`"]) | |
| 890 ("n~~" ["n~"]) | |
| 891 ("o''" ["o'"]) | |
| 892 ("o//" ["o/"]) | |
| 893 ("o\"\"" ["o\""]) | |
| 894 ("o^^" ["o^"]) | |
| 895 ("o``" ["o`"]) | |
| 896 ("o~~" ["o~"]) | |
| 897 ("s``" ["s`"]) | |
| 898 ("s//" ["s/"]) | |
| 899 ("u''" ["u'"]) | |
| 900 ("u\"\"" ["u\""]) | |
| 901 ("u^^" ["u^"]) | |
| 902 ("u``" ["u`"]) | |
| 903 ("y\"\"" ["y\""]) | |
| 904 ) | |
| 905 | |
| 906 (quail-define-package | |
| 907 "danish-alt-postfix" "Latin-1" "DA<" t | |
| 908 "Danish input method (rule: AE -> ,AF(B, OE -> ,AX(B, AA -> ,AE(B, E' -> ,AI(B) | |
| 909 | |
| 910 Doubling the postfix separates the letter and postfix: e.g. aee -> ae | |
| 911 " | |
| 912 nil t nil nil nil nil nil nil nil nil t) | |
| 913 | |
| 914 (quail-define-rules | |
| 915 ("AE" ?,AF(B) | |
| 916 ("ae" ?,Af(B) | |
| 917 ("OE" ?,AX(B) | |
| 918 ("oe" ?,Ax(B) | |
| 919 ("AA" ?,AE(B) | |
| 920 ("aa" ?,Ae(B) | |
| 921 ("E'" ?,AI(B) | |
| 922 ("e'" ?,Ai(B) | |
| 923 | |
| 924 ("AEE" ["AE"]) | |
| 925 ("aee" ["ae"]) | |
| 926 ("OEE" ["OE"]) | |
| 927 ("oee" ["oe"]) | |
| 928 ("AAA" ["AA"]) | |
| 929 ("aaa" ["aa"]) | |
| 930 ("E''" ["E'"]) | |
| 931 ("e''" ["e'"]) | |
| 932 ) | |
| 933 | |
| 934 (quail-define-package | |
| 935 "esperanto-alt-postfix" "Latin-3" "EO<" t | |
| 936 "Esperanto input method with postfix modifiers | |
| 937 | |
| 938 A following ^ or x will produce an accented character, | |
| 34937 | 939 e.g. c^ -> ,Cf(B gx -> ,Cx(B u^ -> ,C}(B. |
| 19901 | 940 |
| 941 Doubling the postfix separates the letter and postfix, | |
| 942 e.g. a'' -> a'. | |
| 943 " nil t nil nil nil nil nil nil nil nil t) | |
| 944 | |
| 945 (quail-define-rules | |
| 946 ("Cx" ?,CF(B) | |
| 947 ("C^" ?,CF(B) | |
| 948 ("cx" ?,Cf(B) | |
| 949 ("c^" ?,Cf(B) | |
| 950 ("Gx" ?,CX(B) | |
| 951 ("G^" ?,CX(B) | |
| 952 ("gx" ?,Cx(B) | |
| 953 ("g^" ?,Cx(B) | |
| 954 ("Hx" ?,C&(B) | |
| 955 ("H^" ?,C&(B) | |
| 956 ("hx" ?,C6(B) | |
| 957 ("h^" ?,C6(B) | |
| 958 ("Jx" ?,C,(B) | |
| 959 ("J^" ?,C,(B) | |
| 960 ("jx" ?,C<(B) | |
| 961 ("j^" ?,C<(B) | |
| 962 ("Sx" ?,C^(B) | |
| 963 ("S^" ?,C^(B) | |
| 964 ("sx" ?,C~(B) | |
| 965 ("s^" ?,C~(B) | |
| 966 ("Ux" ?,C](B) | |
| 967 ("U^" ?,C](B) | |
| 968 ("ux" ?,C}(B) | |
| 969 ("u^" ?,C}(B) | |
| 970 | |
| 971 ("Cxx" ["Cx"]) | |
| 972 ("C^^" ["C^"]) | |
| 973 ("cxx" ["cx"]) | |
| 974 ("c^^" ["c^"]) | |
| 975 ("Gxx" ["Gx"]) | |
| 976 ("G^^" ["G^"]) | |
| 977 ("gxx" ["gx"]) | |
| 978 ("g^^" ["g^"]) | |
| 979 ("Hxx" ["Hx"]) | |
| 980 ("H^^" ["H^"]) | |
| 981 ("hxx" ["hx"]) | |
| 982 ("h^^" ["h^"]) | |
| 983 ("Jxx" ["Jx"]) | |
| 984 ("J^^" ["J^"]) | |
| 985 ("jxx" ["jx"]) | |
| 986 ("j^^" ["j^"]) | |
| 987 ("Sxx" ["Sx"]) | |
| 988 ("S^^" ["S^"]) | |
| 989 ("sxx" ["sx"]) | |
| 990 ("s^^" ["s^"]) | |
| 991 ("Uxx" ["Ux"]) | |
| 992 ("U^^" ["U^"]) | |
| 993 ("uxx" ["ux"]) | |
| 994 ("u^^" ["u^"]) | |
| 995 ) | |
| 996 | |
| 997 (quail-define-package | |
| 998 "finnish-alt-postfix" "Latin-1" "FI<" t | |
| 999 "Finnish (Suomi) input method | |
| 1000 | |
| 1001 AE -> ,AD(B | |
| 1002 AEE -> AE | |
| 1003 OE -> ,AV(B | |
| 1004 OEE -> OE | |
| 1005 " | |
| 1006 nil t nil nil nil nil nil nil nil nil t) | |
| 1007 | |
| 1008 (quail-define-rules | |
| 1009 ("AE" ?,AD(B) | |
| 1010 ("ae" ?,Ad(B) | |
| 1011 ("OE" ?,AV(B) | |
| 1012 ("oe" ?,Av(B) | |
| 1013 | |
| 1014 ("AEE" ["AE"]) | |
| 1015 ("aee" ["ae"]) | |
| 1016 ("OEE" ["OE"]) | |
| 1017 ("oee" ["oe"]) | |
| 1018 ) | |
| 1019 | |
| 1020 (quail-define-package | |
|
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1021 "french-alt-postfix" "French" "FR<" t |
| 19901 | 1022 "French (Fran,Ag(Bais) input method with postfix modifiers |
| 1023 | |
| 1024 ` pour grave, ' pour aigu, ^ pour circonflexe, et \" pour tr,Ai(Bma. | |
| 34937 | 1025 Par exemple: a` -> ,A`(B e' -> ,Ai(B. |
| 19901 | 1026 |
| 1027 ,AG(B, ,A+(B, et ,A;(B sont produits par C/, <<, et >>. | |
| 1028 | |
| 1029 En doublant la frappe des diacritiques, ils s'isoleront de la lettre. | |
| 1030 Par exemple: e'' -> e' | |
| 1031 | |
| 1032 <e dans l'o> n'est pas disponible." | |
| 1033 nil t nil nil nil nil nil nil nil nil t) | |
| 1034 | |
| 1035 (quail-define-rules | |
| 1036 ("A`" ?,A@(B) | |
| 1037 ("A^" ?,AB(B) | |
| 1038 ("a`" ?,A`(B) | |
| 1039 ("a^" ?,Ab(B) | |
| 1040 ("E`" ?,AH(B) | |
| 1041 ("E'" ?,AI(B) | |
| 1042 ("E^" ?,AJ(B) | |
| 1043 ("E\"" ?,AK(B) | |
| 1044 ("e`" ?,Ah(B) | |
| 1045 ("e'" ?,Ai(B) | |
| 1046 ("e^" ?,Aj(B) | |
| 1047 ("e\"" ?,Ak(B) | |
| 1048 ("I^" ?,AN(B) | |
| 1049 ("I\"" ?,AO(B) | |
| 1050 ("i^" ?,An(B) | |
| 1051 ("i\"" ?,Ao(B) | |
| 1052 ("O^" ?,AT(B) | |
| 1053 ("o^" ?,At(B) | |
| 1054 ("U`" ?,AY(B) | |
| 1055 ("U^" ?,A[(B) | |
| 1056 ("U\"" ?,A\(B) | |
| 1057 ("u`" ?,Ay(B) | |
| 1058 ("u^" ?,A{(B) | |
| 1059 ("u\"" ?,A|(B) | |
| 1060 ("C/" ?,AG(B) | |
| 1061 ("c/" ?,Ag(B) | |
| 1062 ("<<" ?,A+(B) | |
| 1063 (">>" ?,A;(B) | |
| 1064 | |
| 1065 ("A``" ["A`"]) | |
| 1066 ("A^^" ["A^"]) | |
| 1067 ("a``" ["a`"]) | |
| 1068 ("a^^" ["a^"]) | |
| 1069 ("E``" ["E`"]) | |
| 1070 ("E''" ["E'"]) | |
| 1071 ("E^^" ["E^"]) | |
| 1072 ("E\"\"" ["E\""]) | |
| 1073 ("e``" ["e`"]) | |
| 1074 ("e''" ["e'"]) | |
| 1075 ("e^^" ["e^"]) | |
| 1076 ("e\"\"" ["e\""]) | |
| 1077 ("I^^" ["I^"]) | |
| 1078 ("I\"\"" ["I\""]) | |
| 1079 ("i^^" ["i^"]) | |
| 1080 ("i\"\"" ["i\""]) | |
| 1081 ("O^^" ["O^"]) | |
| 1082 ("o^^" ["o^"]) | |
| 1083 ("U``" ["U`"]) | |
| 1084 ("U^^" ["U^"]) | |
| 1085 ("U\"\"" ["U\""]) | |
| 1086 ("u``" ["u`"]) | |
| 1087 ("u^^" ["u^"]) | |
| 1088 ("u\"\"" ["u\""]) | |
| 1089 ("C//" ["C/"]) | |
| 1090 ("c//" ["c/"]) | |
| 1091 ("<<<" ["<<"]) | |
| 1092 (">>>" [">>"]) | |
| 1093 ) | |
| 1094 | |
| 1095 (quail-define-package | |
|
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1096 "german-alt-postfix" "German" "DE<" t |
| 19901 | 1097 "German (Deutsch) input method |
| 1098 | |
| 1099 ae -> ,Ad(B | |
| 1100 aee -> ae | |
| 1101 oe -> ,Av(B | |
| 1102 oee -> oe | |
| 1103 ue -> ,A|(B | |
| 1104 uee -> ue | |
| 1105 sz -> ,A_(B | |
| 1106 szz -> sz | |
| 1107 " | |
| 1108 nil t nil nil nil nil nil nil nil nil t) | |
| 1109 | |
| 1110 (quail-define-rules | |
| 1111 ("AE" ?,AD(B) | |
| 1112 ("ae" ?,Ad(B) | |
| 1113 ("OE" ?,AV(B) | |
| 1114 ("oe" ?,Av(B) | |
| 1115 ("UE" ?,A\(B) | |
| 1116 ("ue" ?,A|(B) | |
| 1117 ("sz" ?,A_(B) | |
| 1118 | |
| 1119 ("AEE" ["AE"]) | |
| 1120 ("aee" ["ae"]) | |
| 1121 ("OEE" ["OE"]) | |
| 1122 ("oee" ["oe"]) | |
| 1123 ("UEE" ["UE"]) | |
| 1124 ("uee" ["ue"]) | |
| 1125 ("szz" ["sz"]) | |
| 1126 ) | |
| 1127 | |
| 1128 (quail-define-package | |
| 1129 "icelandic-alt-postfix" "Latin-1" "IS<" t | |
| 1130 "Icelandic (,AM(Bslenska) input method with postfix modifiers | |
| 1131 | |
| 1132 A' -> ,AA(B | |
| 1133 E' -> ,AI(B | |
| 1134 I' -> ,AM(B | |
| 1135 O' -> ,AS(B | |
| 1136 U' -> ,AZ(B | |
| 1137 Y' -> ,A](B | |
| 1138 AE -> ,AF(B | |
| 1139 OE -> ,AV(B | |
| 1140 D/ -> ,AP(B (eth) | |
| 1141 T/ -> ,A^(B (thorn) | |
| 1142 | |
| 1143 Doubling the postfix separates the letter and postfix: e.g. a'' -> a' | |
| 1144 " nil t nil nil nil nil nil nil nil nil t) | |
| 1145 | |
| 1146 (quail-define-rules | |
| 1147 ("A'" ?,AA(B) | |
| 1148 ("a'" ?,Aa(B) | |
| 1149 ("E'" ?,AI(B) | |
| 1150 ("e'" ?,Ai(B) | |
| 1151 ("I'" ?,AM(B) | |
| 1152 ("i'" ?,Am(B) | |
| 1153 ("O'" ?,AS(B) | |
| 1154 ("o'" ?,As(B) | |
| 1155 ("U'" ?,AZ(B) | |
| 1156 ("u'" ?,Az(B) | |
| 1157 ("Y'" ?,A](B) | |
| 1158 ("y'" ?,A}(B) | |
| 1159 ("AE" ?,AF(B) | |
| 1160 ("ae" ?,Af(B) | |
| 1161 ("OE" ?,AV(B) | |
| 1162 ("oe" ?,Av(B) | |
| 1163 ("D/" ?,AP(B) | |
| 1164 ("d/" ?,Ap(B) | |
| 1165 ("T/" ?,A^(B) | |
| 1166 ("t/" ?,A~(B) | |
| 1167 | |
| 1168 ("A''" ["A'"]) | |
| 1169 ("a''" ["a'"]) | |
| 1170 ("E''" ["E'"]) | |
| 1171 ("e''" ["e'"]) | |
| 1172 ("I''" ["I'"]) | |
| 1173 ("i''" ["i'"]) | |
| 1174 ("O''" ["O'"]) | |
| 1175 ("o''" ["o'"]) | |
| 1176 ("U''" ["U'"]) | |
| 1177 ("u''" ["u'"]) | |
| 1178 ("Y''" ["Y'"]) | |
| 1179 ("y''" ["y'"]) | |
| 1180 ("AEE" ["AE"]) | |
| 1181 ("aee" ["ae"]) | |
| 1182 ("OEE" ["OE"]) | |
| 1183 ("oee" ["oe"]) | |
| 1184 ("D//" ["D/"]) | |
| 1185 ("d//" ["d/"]) | |
| 1186 ("T//" ["T/"]) | |
| 1187 ("t//" ["t/"]) | |
| 1188 ) | |
| 1189 | |
| 1190 (quail-define-package | |
| 1191 "italian-alt-postfix" "Latin-1" "IT<" t | |
| 1192 "Italian (Italiano) input method with postfix modifiers | |
| 1193 | |
|
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1194 a' -> ,Aa(B A' -> ,AA(B a` -> ,A`(B A` -> ,A@(B i^ -> ,An(B << -> ,A+(B |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1195 e' -> ,Ai(B E' -> ,AI(B e` -> ,Ah(B E` -> ,AH(B I^ -> ,AN(B >> -> ,A;(B |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1196 i' -> ,Am(B I' -> ,AM(B i` -> ,Al(B I` -> ,AL(B o_ -> ,A:(B |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1197 o' -> ,As(B O' -> ,AS(B o` -> ,Ar(B O` -> ,AR(B a_ -> ,A*(B |
|
40357
6f61c4e09b89
("italian-alt-postfix"): Undo previous change.
Francesco Potortì <pot@gnu.org>
parents:
40300
diff
changeset
|
1198 u' -> ,Az(B U' -> ,AZ(B u` -> ,Ay(B U` -> ,AY(B |
|
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1199 |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1200 This method is for purists who like accents the old way. |
| 19901 | 1201 |
| 1202 Doubling the postfix separates the letter and postfix: e.g. a`` -> a` | |
| 1203 " nil t nil nil nil nil nil nil nil nil t) | |
| 1204 | |
| 1205 (quail-define-rules | |
| 1206 ("A`" ?,A@(B) | |
|
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1207 ("A'" ?,AA(B) |
| 19901 | 1208 ("a`" ?,A`(B) |
|
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1209 ("a'" ?,Aa(B) |
| 19901 | 1210 ("E`" ?,AH(B) |
|
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1211 ("E'" ?,AI(B) |
| 19901 | 1212 ("e`" ?,Ah(B) |
|
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1213 ("e'" ?,Ai(B) |
| 19901 | 1214 ("I`" ?,AL(B) |
| 1215 ("i`" ?,Al(B) | |
|
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1216 ("I'" ?,AM(B) |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1217 ("i'" ?,Am(B) |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1218 ("I^" ?,AN(B) |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1219 ("i^" ?,An(B) |
| 19901 | 1220 ("O`" ?,AR(B) |
| 1221 ("o`" ?,Ar(B) | |
|
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1222 ("O'" ?,AS(B) |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1223 ("o'" ?,As(B) |
| 19901 | 1224 ("U`" ?,AY(B) |
| 1225 ("u`" ?,Ay(B) | |
|
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1226 ("U'" ?,AZ(B) |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1227 ("u'" ?,Az(B) |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1228 ("<<" ?,A+(B) |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1229 (">>" ?,A;(B) |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1230 ("o_" ?,A:(B) |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1231 ("a_" ?,A*(B) |
| 19901 | 1232 |
| 1233 ("A``" ["A`"]) | |
|
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1234 ("A''" ["A'"]) |
| 19901 | 1235 ("a``" ["a`"]) |
|
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1236 ("a''" ["a'"]) |
| 19901 | 1237 ("E``" ["E`"]) |
|
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1238 ("E''" ["E'"]) |
| 19901 | 1239 ("e``" ["e`"]) |
|
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1240 ("e''" ["e'"]) |
| 19901 | 1241 ("I``" ["I`"]) |
| 1242 ("i``" ["i`"]) | |
|
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1243 ("I''" ["I'"]) |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1244 ("i''" ["i'"]) |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1245 ("I^^" ["I^"]) |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1246 ("i^^" ["i^"]) |
| 19901 | 1247 ("O``" ["O`"]) |
| 1248 ("o``" ["o`"]) | |
|
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1249 ("O''" ["O'"]) |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1250 ("o''" ["o'"]) |
| 19901 | 1251 ("U``" ["U`"]) |
| 1252 ("u``" ["u`"]) | |
|
23446
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1253 ("U''" ["U'"]) |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1254 ("u''" ["u'"]) |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1255 ("<<<" ["<<"]) |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1256 (">>>" [">>"]) |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1257 ("o__" ["o_"]) |
|
2a31f1833c0e
("latin-1-alt-postfix"): Add a method to enter the
Richard M. Stallman <rms@gnu.org>
parents:
21507
diff
changeset
|
1258 ("a__" ["a_"]) |
| 19901 | 1259 ) |
| 1260 | |
| 1261 (quail-define-package | |
| 1262 "norwegian-alt-postfix" "Latin-1" "NO<" t | |
| 1263 "Norwegian (Norsk) input method (rule: AE->,AF(B, OE->,AX(B, AA->,AE(B, E'->,AI(B) | |
| 1264 | |
| 1265 Doubling the postfix separates the letter and postfix: e.g. aee -> ae | |
| 1266 " | |
| 1267 nil t nil nil nil nil nil nil nil nil t) | |
| 1268 | |
| 1269 (quail-define-rules | |
| 1270 ("AE" ?,AF(B) | |
| 1271 ("ae" ?,Af(B) | |
| 1272 ("OE" ?,AX(B) | |
| 1273 ("oe" ?,Ax(B) | |
| 1274 ("AA" ?,AE(B) | |
| 1275 ("aa" ?,Ae(B) | |
| 1276 ("E'" ?,AI(B) | |
| 1277 ("e'" ?,Ai(B) | |
| 1278 | |
| 1279 ("AEE" ["AE"]) | |
| 1280 ("aee" ["ae"]) | |
| 1281 ("OEE" ["OE"]) | |
| 1282 ("oee" ["oe"]) | |
| 1283 ("AAA" ["AA"]) | |
| 1284 ("aaa" ["aa"]) | |
| 1285 ("E''" ["E'"]) | |
| 1286 ("e''" ["e'"]) | |
| 1287 ) | |
| 1288 | |
| 1289 (quail-define-package | |
| 1290 "scandinavian-alt-postfix" "Latin-1" "SC<" t | |
| 1291 "Scandinavian input method with postfix modifiers | |
| 1292 Supported languages are Swidish, Norwegian, Danish, and Finnish. | |
| 1293 | |
| 1294 ae -> ,Af(B | |
| 1295 oe -> ,Ax(B | |
| 1296 aa -> ,Ae(B | |
| 1297 a\" -> ,Ad(B | |
| 1298 o\" -> ,Av(B | |
| 1299 e' -> ,Ai(B | |
| 1300 | |
| 1301 Doubling the postfix separates the letter and postfix: | |
| 34937 | 1302 aee -> ae o\"\" -> o\" etc. |
| 19901 | 1303 " nil t nil nil nil nil nil nil nil nil t) |
| 1304 | |
| 1305 (quail-define-rules | |
| 1306 ("AE" ?,AF(B) | |
| 1307 ("ae" ?,Af(B) | |
| 1308 ("OE" ?,AX(B) | |
| 1309 ("oe" ?,Ax(B) | |
| 1310 ("AA" ?,AE(B) | |
| 1311 ("aa" ?,Ae(B) | |
| 1312 ("A\"" ?,AD(B) | |
| 1313 ("a\"" ?,Ad(B) | |
| 1314 ("O\"" ?,AV(B) | |
| 1315 ("o\"" ?,Av(B) | |
| 1316 ("E'" ?,AI(B) | |
| 1317 ("e'" ?,Ai(B) | |
| 1318 | |
| 1319 ("AEE" ["AE"]) | |
| 1320 ("aee" ["ae"]) | |
| 1321 ("OEE" ["OE"]) | |
| 1322 ("oee" ["oe"]) | |
| 1323 ("AAA" ["AA"]) | |
| 1324 ("aaa" ["aa"]) | |
| 1325 ("A\"\"" ["A\""]) | |
| 1326 ("a\"\"" ["a\""]) | |
| 1327 ("O\"\"" ["O\""]) | |
| 1328 ("o\"\"" ["o\""]) | |
| 1329 ("E''" ["E'"]) | |
| 1330 ("e''" ["e'"]) | |
| 1331 ) | |
| 1332 | |
| 1333 (quail-define-package | |
|
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1334 "spanish-alt-postfix" "Spanish" "ES<" t |
| 19901 | 1335 "Spanish (Espa,Aq(Bol) input method with postfix modifiers |
| 1336 | |
| 1337 A' -> ,AA(B | |
| 1338 E' -> ,AI(B | |
| 1339 I' -> ,AM(B | |
| 1340 O' -> ,AS(B | |
| 1341 U' -> ,AZ(B | |
| 1342 N~ -> ,AQ(B | |
| 1343 !/ -> ,A!(B | |
| 1344 ?/ -> ,A?(B | |
| 1345 | |
| 1346 Doubling the postfix separates the letter and postfix: | |
| 34937 | 1347 a'' -> a' n~~ -> n~, etc. |
| 19901 | 1348 " nil t nil nil nil nil nil nil nil nil t) |
| 1349 | |
| 1350 (quail-define-rules | |
| 1351 ("A'" ?,AA(B) | |
| 1352 ("a'" ?,Aa(B) | |
| 1353 ("E'" ?,AI(B) | |
| 1354 ("e'" ?,Ai(B) | |
| 1355 ("I'" ?,AM(B) | |
| 1356 ("i'" ?,Am(B) | |
| 1357 ("O'" ?,AS(B) | |
| 1358 ("o'" ?,As(B) | |
| 1359 ("U'" ?,AZ(B) | |
| 1360 ("u'" ?,Az(B) | |
| 1361 ("N~" ?,AQ(B) | |
| 1362 ("n~" ?,Aq(B) | |
| 1363 ("?/" ?,A?(B) | |
| 1364 ("!/" ?,A!(B) | |
| 1365 | |
| 1366 ("A''" ["A'"]) | |
| 1367 ("a''" ["a'"]) | |
| 1368 ("E''" ["E'"]) | |
| 1369 ("e''" ["e'"]) | |
| 1370 ("I''" ["I'"]) | |
| 1371 ("i''" ["i'"]) | |
| 1372 ("O''" ["O'"]) | |
| 1373 ("o''" ["o'"]) | |
| 1374 ("U''" ["U'"]) | |
| 1375 ("u''" ["u'"]) | |
| 1376 ("N~~" ["N~"]) | |
| 1377 ("n~~" ["n~"]) | |
| 1378 ("?//" ["?/"]) | |
| 1379 ("!//" ["!/"]) | |
| 1380 ) | |
| 1381 | |
| 1382 (quail-define-package | |
| 1383 "swedish-alt-postfix" "Latin-1" "SV<" t | |
| 1384 "Swedish (Svenska) input method (rule: AA -> ,AE(B, AE -> ,AD(B, OE -> ,AV(B, E' -> ,AI(B) | |
| 1385 | |
| 1386 Doubling the postfix separates the letter and postfix: e.g. aee -> ae | |
| 1387 " nil t nil nil nil nil nil nil nil nil t) | |
| 1388 | |
| 1389 (quail-define-rules | |
| 1390 ("AA" ?,AE(B) | |
| 1391 ("aa" ?,Ae(B) | |
| 1392 ("AE" ?,AD(B) | |
| 1393 ("ae" ?,Ad(B) | |
| 1394 ("OE" ?,AV(B) | |
| 1395 ("oe" ?,Av(B) | |
| 1396 ("E'" ?,AI(B) | |
| 1397 ("e'" ?,Ai(B) | |
| 1398 | |
| 1399 ("AAA" ["AA"]) | |
| 1400 ("aaa" ["aa"]) | |
| 1401 ("AEE" ["AE"]) | |
| 1402 ("aee" ["ae"]) | |
| 1403 ("OEE" ["OE"]) | |
| 1404 ("oee" ["oe"]) | |
| 1405 ("E''" ["E'"]) | |
| 1406 ("e''" ["e'"]) | |
| 1407 ) | |
| 1408 | |
| 1409 (quail-define-package | |
|
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1410 "turkish-latin-3-alt-postfix" "Turkish" "TR3<<" t |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1411 "Turkish (T,A|(Brk,Ag(Be) input method with postfix modifiers. |
| 19901 | 1412 |
|
25774
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1413 This is for those who use Latin-3 (ISO-8859-3) for Turkish. If you |
| 34937 | 1414 use Latin-5 (ISO-8859-9), you should use \"turkish-alt-postfix\" instead. |
|
25774
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1415 |
| 19901 | 1416 Note for I, ,C9(B, ,C)(B, i. |
| 1417 | |
| 1418 A^ -> ,CB(B | |
| 1419 C` -> ,CG(B | |
| 1420 G^ -> ,C+(B | |
| 1421 I -> I | |
| 1422 i -> ,C9(B | |
| 1423 I/ -> ,C)(B | |
| 1424 i/ -> i | |
| 1425 O\" -> ,CV(B | |
| 1426 S` -> ,C*(B | |
| 1427 U\" -> ,C\(B | |
| 1428 U^ -> ,C[(B | |
| 1429 | |
| 1430 Doubling the postfix separates the letter and postfix: e.g. a^^ -> a^ | |
| 1431 " nil t nil nil nil nil nil nil nil nil t) | |
| 1432 | |
| 1433 (quail-define-rules | |
| 1434 ("A^" ?,CB(B) | |
| 1435 ("a^" ?,Cb(B) | |
| 1436 ("C`" ?,CG(B) | |
| 1437 ("c`" ?,Cg(B) | |
| 1438 ("G^" ?,C+(B) | |
| 1439 ("g^" ?,C;(B) | |
| 1440 ("I/" ?,C)(B) | |
| 1441 ("i" ?,C9(B) | |
| 1442 ("i/" ?i) | |
| 1443 ("O\"" ?,CV(B) | |
| 1444 ("o\"" ?,Cv(B) | |
| 1445 ("S`" ?,C*(B) | |
| 1446 ("s`" ?,C:(B) | |
| 1447 ("U\"" ?,C\(B) | |
| 1448 ("u\"" ?,C|(B) | |
| 1449 ("U^" ?,C[(B) | |
| 1450 ("u^" ?,C{(B) | |
| 1451 | |
| 1452 ("A^^" ["A^"]) | |
| 1453 ("a^^" ["a^"]) | |
| 1454 ("C``" ["C`"]) | |
| 1455 ("c``" ["c`"]) | |
| 1456 ("G^^" ["G^"]) | |
| 1457 ("g^^" ["g^"]) | |
| 1458 ("I//" ["I/"]) | |
| 1459 ("i" ["i"]) | |
| 1460 ("i//" ["i/"]) | |
| 1461 ("O\"\"" ["O\""]) | |
| 1462 ("o\"\"" ["o\""]) | |
| 1463 ("S``" ["S`"]) | |
| 1464 ("s``" ["s`"]) | |
| 1465 ("U\"\"" ["U\""]) | |
| 1466 ("u\"\"" ["u\""]) | |
| 1467 ("U^^" ["U^"]) | |
| 1468 ("u^^" ["u^"]) | |
| 1469 ) | |
|
25774
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1470 |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1471 (quail-define-package |
|
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1472 "turkish-alt-postfix" "Turkish" "TR,A+(B" t |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1473 "Turkish (T,A|(Brk,Ag(Be) input method with postfix modifiers. |
|
25774
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1474 |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1475 This is for those who use Latin-5 (ISO-8859-9) for Turkish. If you |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1476 use Latin-3 (ISO-8859-3), you should use |
| 34937 | 1477 \"turkish-latin-3-alt-postfix\" instead. |
|
25774
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1478 |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1479 Note for I, ,M}(B, ,M](B, i. |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1480 |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1481 A^ -> ,MB(B |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1482 C` -> ,MG(B |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1483 G^ -> ,MP(B |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1484 I -> I |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1485 i -> ,M}(B |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1486 I/ -> ,M](B |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1487 i/ -> i |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1488 O\" -> ,MV(B |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1489 S` -> ,M^(B |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1490 U\" -> ,M\(B |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1491 U^ -> ,M[(B |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1492 |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1493 Doubling the postfix separates the letter and postfix: e.g. a^^ -> a^ |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1494 " nil t nil nil nil nil nil nil nil nil t) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1495 |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1496 (quail-define-rules |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1497 ("A^" ?,MB(B) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1498 ("a^" ?,Mb(B) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1499 ("C`" ?,MG(B) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1500 ("c`" ?,Mg(B) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1501 ("G^" ?,MP(B) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1502 ("g^" ?,Mp(B) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1503 ("I/" ?,M](B) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1504 ("i" ?,M}(B) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1505 ("i/" ?i) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1506 ("O\"" ?,MV(B) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1507 ("o\"" ?,Cv(B) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1508 ("S`" ?,M^(B) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1509 ("s`" ?,M~(B) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1510 ("U\"" ?,M\(B) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1511 ("u\"" ?,M|(B) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1512 ("U^" ?,M[(B) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1513 ("u^" ?,M{(B) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1514 |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1515 ("A^^" ["A^"]) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1516 ("a^^" ["a^"]) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1517 ("C``" ["C`"]) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1518 ("c``" ["c`"]) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1519 ("G^^" ["G^"]) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1520 ("g^^" ["g^"]) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1521 ("I//" ["I/"]) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1522 ("i" ["i"]) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1523 ("i//" ["i/"]) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1524 ("O\"\"" ["O\""]) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1525 ("o\"\"" ["o\""]) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1526 ("S``" ["S`"]) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1527 ("s``" ["s`"]) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1528 ("U\"\"" ["U\""]) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1529 ("u\"\"" ["u\""]) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1530 ("U^^" ["U^"]) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1531 ("u^^" ["u^"]) |
|
ccc7f2d178dd
("turkish-latin-3-alt-postfix"): Renamed from
Kenichi Handa <handa@m17n.org>
parents:
23446
diff
changeset
|
1532 ) |
|
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
34937
diff
changeset
|
1533 |
| 40707 | 1534 ;; Dutch Quail input method derived from the one in Yudit by Roman |
| 1535 ;; Czyborra. | |
| 1536 (quail-define-package | |
|
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1537 "dutch" "Dutch" "NL" t |
| 40707 | 1538 "Dutch character mixfix input method. |
| 1539 Uses the `mule-unicode-0100-24ff' charset to supplement Latin-1. | |
| 1540 | |
| 1541 | | examples | |
| 1542 ------------+---------+---------- | |
| 1543 others | | fl. -> $,1!R(B eur. -> $,1tL(B ij -> $,1 S(B IJ -> $,1 R(B | |
| 1544 ------------+---------+---------- | |
| 1545 | postfix | | |
| 1546 ------------+---------+---------- | |
| 1547 acute | ' | a' -> ,Aa(B | |
| 1548 grave | ` | a` -> ,A`(B | |
| 1549 circumflex | ^ | a^ -> ,Ab(B | |
| 1550 Turkish | various | i/ -> $,1 Q(B s, -> $,1 (B g^ -> $,1 ?(B I/ -> $,1 P(B | |
| 1551 | | S, -> $,1 ~(B G^ -> $,1 >(B | |
| 1552 ------------+---------+---------- | |
| 1553 | prefix | | |
| 1554 ------------+---------+---------- | |
| 1555 diaeresis | \" | \"a -> ,Ad(B | |
|
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1556 |
| 40707 | 1557 Doubling the postfix separates the letter and postfix: e.g. a'' -> a' |
| 1558 " nil t nil nil nil nil nil nil nil nil t) | |
| 1559 | |
| 1560 (quail-define-rules | |
|
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1561 ("fl." ?$,1!R(B) ;; LATIN SMALL LETTER F WITH HOOK (florin currency symbol) |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1562 ("eur." ?$,1tL(B) ;; EURO SIGN |
| 40707 | 1563 ;; $,1r|(BThe 25th letter of the Dutch alphabet.$,1r}(B |
|
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1564 ("ij" ?$,1 S(B) ;; LATIN SMALL LIGATURE IJ |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1565 ("IJ" ?$,1 R(B) ;; LATIN CAPITAL LIGATURE IJ |
| 40707 | 1566 ;; $,1r|(BTrema on the second letter of vowel pair.$,1r}(B Yudit uses `:', not `"'. |
|
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1567 ("\"a" ?,Ad(B) ;; LATIN SMALL LETTER A WITH DIAERESIS |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1568 ("\"e" ?,Ak(B) ;; LATIN SMALL LETTER E WITH DIAERESIS |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1569 ("\"i" ?,Ao(B) ;; LATIN SMALL LETTER I WITH DIAERESIS |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1570 ("\"o" ?,Av(B) ;; LATIN SMALL LETTER O WITH DIAERESIS |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1571 ("\"u" ?,A|(B) ;; LATIN SMALL LETTER U WITH DIAERESIS |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1572 ("\"A" ?,AD(B) ;; LATIN CAPITAL LETTER A WITH DIAERESIS |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1573 ("\"E" ?,AK(B) ;; LATIN CAPITAL LETTER E WITH DIAERESIS |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1574 ("\"I" ?,AO(B) ;; LATIN CAPITAL LETTER I WITH DIAERESIS |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1575 ("\"O" ?,AV(B) ;; LATIN CAPITAL LETTER O WITH DIAERESIS |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1576 ("\"U" ?,A\(B) ;; LATIN CAPITAL LETTER U WITH DIAERESIS |
| 40707 | 1577 ;; $,1r|(BAcute, marking emphasis on long vowels$,1r}(B: |
|
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1578 ("a'" ?,Aa(B) ;; LATIN SMALL LETTER A WITH ACUTE |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1579 ("e'" ?,Ai(B) ;; LATIN SMALL LETTER E WITH ACUTE |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1580 ("i'" ?,Am(B) ;; LATIN SMALL LETTER I WITH ACUTE |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1581 ("o'" ?,As(B) ;; LATIN SMALL LETTER O WITH ACUTE |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1582 ("u'" ?,Az(B) ;; LATIN SMALL LETTER U WITH ACUTE |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1583 ("A'" ?,AA(B) ;; LATIN CAPITAL LETTER A WITH ACUTE |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1584 ("E'" ?,AI(B) ;; LATIN CAPITAL LETTER E WITH ACUTE |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1585 ("I'" ?,AM(B) ;; LATIN CAPITAL LETTER I WITH ACUTE |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1586 ("O'" ?,AS(B) ;; LATIN CAPITAL LETTER O WITH ACUTE |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1587 ("U'" ?,AZ(B) ;; LATIN CAPITAL LETTER U WITH ACUTE |
| 40707 | 1588 ;; $,1r|(BGrave, marking emphasis on short vowels$,1r}(B: |
|
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1589 ("a`" ?,A`(B) ;; LATIN SMALL LETTER A WITH GRAVE |
|
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1590 ("e`" ?,Ah(B) ;; LATIN SMALL LETTER E WITH GRAVE |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1591 ("i`" ?,Al(B) ;; LATIN SMALL LETTER I WITH GRAVE |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1592 ("o`" ?,Ar(B) ;; LATIN SMALL LETTER O WITH GRAVE |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1593 ("u`" ?,Ay(B) ;; LATIN SMALL LETTER U WITH GRAVE |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1594 ("A`" ?,A@(B) ;; LATIN CAPITAL LETTER A WITH GRAVE |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1595 ("E`" ?,AH(B) ;; LATIN CAPITAL LETTER E WITH GRAVE |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1596 ("I`" ?,AL(B) ;; LATIN CAPITAL LETTER I WITH GRAVE |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1597 ("O`" ?,AR(B) ;; LATIN CAPITAL LETTER O WITH GRAVE |
|
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1598 ("U`" ?,AY(B) ;; LATIN CAPITAL LETTER U WITH GRAVE |
| 40707 | 1599 ;; $,1r|(BCater for the use of many French words and use of the circumflex |
| 1600 ;; in Frisian.$,1r}(B Yudit used `;' for cedilla. | |
|
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1601 ("c," ?,Ag(B) ;; LATIN SMALL LETTER C WITH CEDILLA |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1602 ("C," ?,AG(B) ;; LATIN CAPITAL LETTER C WITH CEDILLA |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1603 ("a^" ?,Ab(B) ;; LATIN SMALL LETTER A WITH CIRCUMFLEX |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1604 ("e^" ?,Aj(B) ;; LATIN SMALL LETTER E WITH CIRCUMFLEX |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1605 ("i^" ?,An(B) ;; LATIN SMALL LETTER I WITH CIRCUMFLEX |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1606 ("o^" ?,At(B) ;; LATIN SMALL LETTER O WITH CIRCUMFLEX |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1607 ("u^" ?,A{(B) ;; LATIN SMALL LETTER U WITH CIRCUMFLEX |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1608 ("A^" ?,AB(B) ;; LATIN CAPITAL LETTER A WITH CIRCUMFLEX |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1609 ("E^" ?,AJ(B) ;; LATIN CAPITAL LETTER E WITH CIRCUMFLEX |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1610 ("I^" ?,AN(B) ;; LATIN CAPITAL LETTER I WITH CIRCUMFLEX |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1611 ("O^" ?,AT(B) ;; LATIN CAPITAL LETTER O WITH CIRCUMFLEX |
|
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1612 ("U^" ?,A[(B) ;; LATIN CAPITAL LETTER U WITH CIRCUMFLEX |
| 40707 | 1613 ;; $,1r|(BFollow the example of the Dutch POSIX locale, using ISO-8859-9 to |
| 1614 ;; cater to the many Turks in Dutch society.$,1r}(B Perhaps German methods | |
| 1615 ;; should do so too. Follow turkish-alt-postfix here. | |
|
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1616 ("i/" ?$,1 Q(B) ;; LATIN SMALL LETTER I WITH NO DOT |
|
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1617 ("s," ?$,1 (B) ;; LATIN SMALL LETTER S WITH CEDILLA |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1618 ("g^" ?$,1 ?(B) ;; LATIN SMALL LETTER G WITH BREVE |
|
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1619 ("I/" ?$,1 P(B) ;; LATIN CAPITAL LETTER I WITH DOT ABOVE |
|
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1620 ("S," ?$,1 ~(B) ;; LATIN CAPITAL LETTER S WITH CEDILLA |
|
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
47412
diff
changeset
|
1621 ("G^" ?$,1 >(B) ;; LATIN CAPITAL LETTER G WITH BREVE |
| 40707 | 1622 ) |
| 1623 | |
|
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1624 ;; Originally from Yudit, discussed with Albertas Agejevas |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1625 ;; <alga@uosis.mif.vu.lt> |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1626 (quail-define-package |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1627 "lithuanian-numeric" "Lithuanian" "LtN" t |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1628 "Lithuanian numeric input method. |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1629 " nil t t t t nil nil nil nil nil t) |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1630 |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1631 (quail-define-rules |
| 42059 | 1632 ("1" ?$,1 %(B) |
| 1633 ("2" ?$,1 -(B) | |
| 1634 ("3" ?$,1 9(B) | |
| 1635 ("4" ?$,1 7(B) | |
| 1636 ("5" ?$,1 O(B) | |
| 1637 ("6" ?$,1!!(B) | |
| 1638 ("7" ?$,1!3(B) | |
| 1639 ("8" ?$,1!+(B) | |
| 1640 ("9" ?$,1r~(B) | |
| 1641 ("0" ?$,1r|(B) | |
| 1642 ("=" ?$,1!>(B) | |
| 1643 ("!" ?$,1 $(B) | |
| 1644 ("@" ?$,1 ,(B) | |
| 1645 ("#" ?$,1 8(B) | |
| 1646 ("$" ?$,1 6(B) | |
| 1647 ("%" ?$,1 N(B) | |
| 1648 ("^" ?$,1! (B) | |
| 1649 ("&" ?$,1!2(B) | |
| 1650 ("*" ?$,1!*(B) | |
| 1651 ("+" ?$,1!=(B)) | |
|
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1652 |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1653 ;; From XFree 4.1 /usr/X11R6/lib/X11/xkb/symbols/lt, suggested by |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1654 ;; Albertas Agejevas <alga@uosis.mif.vu.lt> |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1655 (quail-define-package |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1656 "lithuanian-keyboard" "Lithuanian" "Lt" t |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1657 "Lithuanian standard keyboard input method. |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1658 " nil t t t t nil nil nil nil nil t) |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1659 |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1660 (quail-define-rules |
| 42059 | 1661 ("1" ?$,1 %(B) |
| 1662 ("!" ?$,1 $(B) | |
| 1663 ("2" ?$,1 -(B) | |
| 1664 ("@" ?$,1 ,(B) | |
| 1665 ("#" ?$,1 8(B) | |
| 1666 ("4" ?$,1 7(B) | |
| 1667 ("$" ?$,1 6(B) | |
| 1668 ("5" ?$,1 O(B) | |
| 1669 ("%" ?$,1 N(B) | |
| 1670 ("6" ?$,1!!(B) | |
| 1671 ("^" ?$,1! (B) | |
| 1672 ("7" ?$,1!3(B) | |
| 1673 ("&" ?$,1!2(B) | |
| 1674 ("9" ?$,1r~(B) | |
| 1675 ("0" ?$,1r|(B) | |
| 1676 ("=" ?$,1!>(B) | |
| 1677 ("+" ?$,1!=(B)) | |
|
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1678 |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1679 ;; From XFree 4.1 /usr/X11R6/lib/X11/xkb/symbols/lv |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1680 (quail-define-package |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1681 "latvian-keyboard" "Latvian" "Lv" t |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1682 "Latvian standard keyboard input method. |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1683 " nil t t t t nil nil nil nil nil t) |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1684 |
|
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1685 (quail-define-rules |
| 42059 | 1686 ("4" ?$,1tL(B) |
| 1687 ("$" ?,A"(B) | |
| 1688 ("e" ?$,1 3(B) | |
| 1689 ("E" ?$,1 2(B) | |
| 1690 ("r" ?$,1 w(B) | |
| 1691 ("R" ?$,1 v(B) | |
| 1692 ("u" ?$,1!+(B) | |
| 1693 ("U" ?$,1!*(B) | |
| 1694 ("i" ?$,1 K(B) | |
| 1695 ("I" ?$,1 J(B) | |
| 1696 ("o" ?$,1 m(B) | |
| 1697 ("O" ?$,1 l(B) | |
| 1698 ("a" ?$,1 !(B) | |
| 1699 ("A" ?$,1 (B) | |
| 1700 ("s" ?$,1!!(B) | |
| 1701 ("S" ?$,1! (B) | |
| 1702 ("g" ?$,1 C(B) | |
| 1703 ("G" ?$,1 B(B) | |
| 1704 ("k" ?$,1 W(B) | |
| 1705 ("K" ?$,1 V(B) | |
| 1706 ("l" ?$,1 \(B) | |
| 1707 ("L" ?$,1 [(B) | |
| 1708 ("\'" ?$,1r|(B) | |
| 1709 ("\"" ?$,1r~(B) | |
| 1710 ("z" ?$,1!>(B) | |
| 1711 ("Z" ?$,1!=(B) | |
| 1712 ("c" ?$,1 -(B) | |
| 1713 ("C" ?$,1 ,(B) | |
| 1714 ("n" ?$,1 f(B) | |
| 1715 ("N" ?$,1 e(B)) | |
|
42036
024727240516
("french-alt-postfix", "german-alt-postfix")
Dave Love <fx@gnu.org>
parents:
41077
diff
changeset
|
1716 |
| 46666 | 1717 (quail-define-package |
| 1718 "latin-alt-postfix" "Latin" "L<" t | |
| 1719 "Latin character input method with postfix modifiers. | |
| 1720 This is the union of various input methods originally made for input | |
| 1721 of characters from a single Latin-N charset. | |
| 1722 | |
| 1723 | postfix | examples | |
| 1724 ------------+---------+---------- | |
| 1725 acute | ' | a' -> ,Aa(B | |
| 1726 grave | ` | a` -> ,A`(B | |
| 1727 circumflex | ^ | a^ -> ,Ab(B | |
| 1728 diaeresis | \" | a\" -> ,Ad(B | |
| 1729 tilde | ~ | a~ -> ,Ac(B | |
| 1730 cedilla | /` | c/ -> ,Ag(B c` -> ,Ag(B | |
| 1731 ogonek | ` | a` -> $,1 %(B | |
| 1732 breve | ~ | a~ -> $,1 #(B | |
| 1733 caron | ~ | c~ -> $,1 -(B | |
| 1734 dbl. acute | : | o: -> $,1 q(B | |
| 1735 ring | ` | u` -> $,1!/(B | |
| 1736 dot | ` | z` -> $,1!<(B | |
| 1737 stroke | / | d/ -> $,1 1(B | |
| 1738 nordic | / | d/ -> ,Ap(B t/ -> ,A~(B a/ -> ,Ae(B e/ -> ,Af(B o/ -> ,Ax(B | |
| 1739 others | /<> | s/ -> ,A_(B ?/ -> ,A?(B !/ -> ,A!(B | |
| 1740 | various | << -> ,A+(B >> -> ,A;(B o_ -> ,A:(B a_ -> ,A*(B | |
| 1741 | |
| 1742 It would be natural to use comma for cedillas, but that would be | |
| 1743 inconvenient in practice because commas are needed very often after a | |
| 1744 letter. | |
| 1745 | |
| 1746 Doubling the postfix separates the letter and postfix: e.g. a'' -> a' | |
| 1747 " nil t nil nil nil nil nil nil nil nil t) | |
| 1748 | |
| 1749 ;; Fixme: ,A&(B ,A'(B ,A((B ,A)(B ,A,(B ,A-(B ,A.(B ,A/(B ,A0(B ,A1(B ,A2(B ,A3(B ,A4(B ,A5(B ,A6(B ,A7(B ,A8(B ,A9(B ,A<(B ,A=(B ,A>(B ,AW(B ,Aw(B | |
| 1750 (quail-define-rules | |
| 1751 (" _" ?,A (B) | |
| 1752 ("!/" ?,A!(B) | |
| 1753 ("//" ?,A0(B) | |
| 1754 ("<<" ?,A+(B) | |
| 1755 (">>" ?,A;(B) | |
| 1756 ("?/" ?,A?(B) | |
| 1757 ("$/" ?,A#(B) | |
| 1758 ("$/" ?,A$(B) | |
| 1759 ("A'" ?,AA(B) | |
| 1760 ("A-" ?$,1 (B) | |
| 1761 ("A/" ?,AE(B) | |
| 1762 ("A\"" ?,AD(B) | |
| 1763 ("A^" ?,AB(B) | |
| 1764 ("A`" ?,A@(B) | |
| 1765 ("A`" ?$,1 $(B) | |
| 1766 ("A~" ?,AC(B) | |
| 1767 ("A~" ?$,1 "(B) | |
| 1768 ("C'" ?$,1 &(B) | |
| 1769 ("C/" ?,AG(B) | |
| 1770 ("C/" ?$,1 *(B) | |
| 1771 ("C^" ?$,1 ((B) | |
| 1772 ("C`" ?,AG(B) | |
| 1773 ("C~" ?$,1 ,(B) | |
| 1774 ("D/" ?,AP(B) | |
| 1775 ("D/" ?$,1 0(B) | |
| 1776 ("D~" ?$,1 .(B) | |
| 1777 ("E'" ?,AI(B) | |
| 1778 ("E-" ?$,1 2(B) | |
| 1779 ("E/" ?,AF(B) | |
| 1780 ("E\"" ?,AK(B) | |
| 1781 ("E^" ?,AJ(B) | |
| 1782 ("E`" ?,AH(B) | |
| 1783 ("E`" ?$,1 8(B) | |
| 1784 ("E~" ?$,1 6(B) | |
| 1785 ("E~" ?$,1 :(B) | |
| 1786 ("G/" ?$,1 @(B) | |
| 1787 ("G^" ?$,1 <(B) | |
| 1788 ("G`" ?$,1 B(B) | |
| 1789 ("G~" ?$,1 >(B) | |
| 1790 ("H/" ?$,1 F(B) | |
| 1791 ("H^" ?$,1 D(B) | |
| 1792 ("I'" ?,AM(B) | |
| 1793 ("I-" ?$,1 J(B) | |
| 1794 ("I/" ?$,1 P(B) | |
| 1795 ("I\"" ?,AO(B) | |
| 1796 ("I^" ?,AN(B) | |
| 1797 ("I`" ?,AL(B) | |
| 1798 ("I`" ?$,1 N(B) | |
| 1799 ("I~" ?$,1 H(B) | |
| 1800 ("J^" ?$,1 T(B) | |
| 1801 ("K`" ?$,1 V(B) | |
| 1802 ("L'" ?$,1 Y(B) | |
| 1803 ("L/" ?$,1 a(B) | |
| 1804 ("L`" ?$,1 [(B) | |
| 1805 ("L~" ?$,1 ](B) | |
| 1806 ("N'" ?$,1 c(B) | |
| 1807 ("N/" ?$,1 j(B) | |
| 1808 ("N`" ?$,1 e(B) | |
| 1809 ("N~" ?,AQ(B) | |
| 1810 ("N~" ?$,1 g(B) | |
| 1811 ("O'" ?,AS(B) | |
| 1812 ("O-" ?$,1 l(B) | |
| 1813 ("O/" ?,AX(B) | |
| 1814 ("O:" ?$,1 p(B) | |
| 1815 ("O\"" ?,AV(B) | |
| 1816 ("O^" ?,AT(B) | |
| 1817 ("O`" ?,AR(B) | |
| 1818 ("O~" ?,AU(B) | |
| 1819 ("R'" ?$,1 t(B) | |
| 1820 ("R`" ?$,1 v(B) | |
| 1821 ("R~" ?$,1 x(B) | |
| 1822 ("S'" ?$,1 z(B) | |
| 1823 ("S^" ?$,1 |(B) | |
| 1824 ("S`" ?$,1 ~(B) | |
| 1825 ("S~" ?$,1! (B) | |
| 1826 ("T/" ?,A^(B) | |
| 1827 ("T/" ?$,1!&(B) | |
| 1828 ("T`" ?$,1!"(B) | |
| 1829 ("T~" ?$,1!$(B) | |
| 1830 ("U'" ?,AZ(B) | |
| 1831 ("U-" ?$,1!*(B) | |
| 1832 ("U:" ?$,1!0(B) | |
| 1833 ("U\"" ?,A\(B) | |
| 1834 ("U^" ?,A[(B) | |
| 1835 ("U`" ?,AY(B) | |
| 1836 ("U`" ?$,1!.(B) | |
| 1837 ("U`" ?$,1!2(B) | |
| 1838 ("U~" ?$,1!((B) | |
| 1839 ("U~" ?$,1!,(B) | |
| 1840 ("Y'" ?,A](B) | |
| 1841 ("Y\"" ?$,1!8(B) | |
| 1842 ("Y=" ?,A%(B) | |
| 1843 ("Z'" ?$,1!9(B) | |
| 1844 ("Z/" ?$,1!;(B) | |
| 1845 ("Z`" ?$,1!;(B) | |
| 1846 ("Z~" ?$,1!=(B) | |
| 1847 ("a'" ?,Aa(B) | |
| 1848 ("a-" ?$,1 !(B) | |
| 1849 ("a/" ?,Ae(B) | |
| 1850 ("a\"" ?,Ad(B) | |
| 1851 ("a^" ?,Ab(B) | |
| 1852 ("a_" ?,A*(B) | |
| 1853 ("a`" ?,A`(B) | |
| 1854 ("a`" ?$,1 %(B) | |
| 1855 ("a~" ?,Ac(B) | |
| 1856 ("a~" ?$,1 #(B) | |
| 1857 ("c'" ?$,1 '(B) | |
| 1858 ("c/" ?,Ag(B) | |
| 1859 ("c/" ?$,1 +(B) | |
| 1860 ("c/" ?,A"(B) | |
| 1861 ("c^" ?$,1 )(B) | |
| 1862 ("c`" ?,Ag(B) | |
| 1863 ("c~" ?$,1 -(B) | |
| 1864 ("d/" ?,Ap(B) | |
| 1865 ("d/" ?$,1 1(B) | |
| 1866 ("d~" ?$,1 /(B) | |
| 1867 ("e'" ?,Ai(B) | |
| 1868 ("e-" ?$,1 3(B) | |
| 1869 ("e/" ?,Af(B) | |
| 1870 ("e\"" ?,Ak(B) | |
| 1871 ("e^" ?,Aj(B) | |
| 1872 ("e`" ?,Ah(B) | |
| 1873 ("e`" ?$,1 9(B) | |
| 1874 ("e~" ?$,1 7(B) | |
| 1875 ("e~" ?$,1 ;(B) | |
| 1876 ("e=" ?$,1tL(B) | |
| 1877 ("g/" ?$,1 A(B) | |
| 1878 ("g^" ?$,1 =(B) | |
| 1879 ("g`" ?$,1 C(B) | |
| 1880 ("g~" ?$,1 ?(B) | |
| 1881 ("h/" ?$,1 G(B) | |
| 1882 ("h^" ?$,1 E(B) | |
| 1883 ("i'" ?,Am(B) | |
| 1884 ("i-" ?$,1 K(B) | |
| 1885 ("i/" ?$,1 Q(B) | |
| 1886 ("i\"" ?,Ao(B) | |
| 1887 ("i^" ?,An(B) | |
| 1888 ("i`" ?,Al(B) | |
| 1889 ("i`" ?$,1 O(B) | |
| 1890 ("i~" ?$,1 I(B) | |
| 1891 ("j^" ?$,1 U(B) | |
| 1892 ("k/" ?$,1 X(B) | |
| 1893 ("k`" ?$,1 W(B) | |
| 1894 ("l'" ?$,1 Z(B) | |
| 1895 ("l/" ?$,1 b(B) | |
| 1896 ("l`" ?$,1 \(B) | |
| 1897 ("l~" ?$,1 ^(B) | |
| 1898 ("n'" ?$,1 d(B) | |
| 1899 ("n/" ?$,1 k(B) | |
| 1900 ("n`" ?$,1 f(B) | |
| 1901 ("n~" ?,Aq(B) | |
| 1902 ("n~" ?$,1 h(B) | |
| 1903 ("o'" ?,As(B) | |
| 1904 ("o-" ?$,1 m(B) | |
| 1905 ("o/" ?,Ax(B) | |
| 1906 ("o:" ?$,1 q(B) | |
| 1907 ("o\"" ?,Av(B) | |
| 1908 ("o^" ?,At(B) | |
| 1909 ("o_" ?,A:(B) | |
| 1910 ("o`" ?,Ar(B) | |
| 1911 ("o~" ?,Au(B) | |
| 1912 ("r'" ?$,1 u(B) | |
| 1913 ("r`" ?$,1 w(B) | |
| 1914 ("r~" ?$,1 y(B) | |
| 1915 ("s'" ?$,1 {(B) | |
| 1916 ("s/" ?,A_(B) | |
| 1917 ("s^" ?$,1 }(B) | |
| 1918 ("s`" ?$,1 (B) | |
| 1919 ("s~" ?$,1!!(B) | |
| 1920 ("t/" ?,A~(B) | |
| 1921 ("t/" ?$,1!'(B) | |
| 1922 ("t`" ?$,1!#(B) | |
| 1923 ("t~" ?$,1!%(B) | |
| 1924 ("u'" ?,Az(B) | |
| 1925 ("u-" ?$,1!+(B) | |
| 1926 ("u:" ?$,1!1(B) | |
| 1927 ("u\"" ?,A|(B) | |
| 1928 ("u^" ?,A{(B) | |
| 1929 ("u`" ?,Ay(B) | |
| 1930 ("u`" ?$,1!/(B) | |
| 1931 ("u`" ?$,1!3(B) | |
| 1932 ("u~" ?$,1!)(B) | |
| 1933 ("u~" ?$,1!-(B) | |
| 1934 ("y'" ?,A}(B) | |
| 1935 ("y\"" ?,A(B) | |
| 1936 ("z'" ?$,1!:(B) | |
| 1937 ("z/" ?$,1!<(B) | |
| 1938 ("z`" ?$,1!<(B) | |
| 1939 ("z~" ?$,1!>(B) | |
| 1940 | |
| 1941 (" __" [" _"]) | |
| 1942 ("!//" ["!/"]) | |
| 1943 ("<<<" ["<<"]) | |
| 1944 (">>>" [">>"]) | |
| 1945 ("?//" ["?/"]) | |
| 1946 ("///" ["//"]) | |
| 1947 ("$//" ["$/"]) | |
| 1948 ("A''" ["A'"]) | |
| 1949 ("A--" ["A-"]) | |
| 1950 ("A//" ["A/"]) | |
| 1951 ("A\"\"" ["A\""]) | |
| 1952 ("A^^" ["A^"]) | |
| 1953 ("A``" ["A`"]) | |
| 1954 ("A~~" ["A~"]) | |
| 1955 ("C''" ["C'"]) | |
| 1956 ("C//" ["C/"]) | |
| 1957 ("C^^" ["C^"]) | |
| 1958 ("C``" ["C`"]) | |
| 1959 ("C~~" ["C~"]) | |
| 1960 ("D//" ["D/"]) | |
| 1961 ("D~~" ["D~"]) | |
| 1962 ("E''" ["E'"]) | |
| 1963 ("E--" ["E-"]) | |
| 1964 ("E//" ["E/"]) | |
| 1965 ("E\"\"" ["E\""]) | |
| 1966 ("E^^" ["E^"]) | |
| 1967 ("E``" ["E`"]) | |
| 1968 ("E~~" ["E~"]) | |
| 1969 ("G//" ["G/"]) | |
| 1970 ("G^^" ["G^"]) | |
| 1971 ("G``" ["G`"]) | |
| 1972 ("G~~" ["G~"]) | |
| 1973 ("H//" ["H/"]) | |
| 1974 ("H^^" ["H^"]) | |
| 1975 ("I''" ["I'"]) | |
| 1976 ("I--" ["I-"]) | |
| 1977 ("I//" ["I/"]) | |
| 1978 ("I\"\"" ["I\""]) | |
| 1979 ("I^^" ["I^"]) | |
| 1980 ("I``" ["I`"]) | |
| 1981 ("I~~" ["I~"]) | |
| 1982 ("J^^" ["J^"]) | |
| 1983 ("K``" ["K`"]) | |
| 1984 ("L''" ["L'"]) | |
| 1985 ("L//" ["L/"]) | |
| 1986 ("L``" ["L`"]) | |
| 1987 ("L~~" ["L~"]) | |
| 1988 ("N''" ["N'"]) | |
| 1989 ("N//" ["N/"]) | |
| 1990 ("N``" ["N`"]) | |
| 1991 ("N~~" ["N~"]) | |
| 1992 ("O''" ["O'"]) | |
| 1993 ("O--" ["O-"]) | |
| 1994 ("O//" ["O/"]) | |
| 1995 ("O::" ["O:"]) | |
| 1996 ("O\"\"" ["O\""]) | |
| 1997 ("O^^" ["O^"]) | |
| 1998 ("O``" ["O`"]) | |
| 1999 ("O~~" ["O~"]) | |
| 2000 ("R''" ["R'"]) | |
| 2001 ("R``" ["R`"]) | |
| 2002 ("R~~" ["R~"]) | |
| 2003 ("S''" ["S'"]) | |
| 2004 ("S^^" ["S^"]) | |
| 2005 ("S``" ["S`"]) | |
| 2006 ("S~~" ["S~"]) | |
| 2007 ("T//" ["T/"]) | |
| 2008 ("T``" ["T`"]) | |
| 2009 ("T~~" ["T~"]) | |
| 2010 ("U''" ["U'"]) | |
| 2011 ("U--" ["U-"]) | |
| 2012 ("U::" ["U:"]) | |
| 2013 ("U\"\"" ["U\""]) | |
| 2014 ("U^^" ["U^"]) | |
| 2015 ("U``" ["U`"]) | |
| 2016 ("U~~" ["U~"]) | |
| 2017 ("Y''" ["Y'"]) | |
| 2018 ("Z''" ["Z'"]) | |
| 2019 ("Z//" ["Z/"]) | |
| 2020 ("Z``" ["Z`"]) | |
| 2021 ("Z~~" ["Z~"]) | |
| 2022 ("a''" ["a'"]) | |
| 2023 ("a--" ["a-"]) | |
| 2024 ("a//" ["a/"]) | |
| 2025 ("a\"\"" ["a\""]) | |
| 2026 ("a^^" ["a^"]) | |
| 2027 ("a__" ["a_"]) | |
| 2028 ("a``" ["a`"]) | |
| 2029 ("a~~" ["a~"]) | |
| 2030 ("c''" ["c'"]) | |
| 2031 ("c//" ["c/"]) | |
| 2032 ("c^^" ["c^"]) | |
| 2033 ("c``" ["c`"]) | |
| 2034 ("c~~" ["c~"]) | |
| 2035 ("d//" ["d/"]) | |
| 2036 ("d~~" ["d~"]) | |
| 2037 ("e''" ["e'"]) | |
| 2038 ("e--" ["e-"]) | |
| 2039 ("e//" ["e/"]) | |
| 2040 ("e\"\"" ["e\""]) | |
| 2041 ("e^^" ["e^"]) | |
| 2042 ("e``" ["e`"]) | |
| 2043 ("e~~" ["e~"]) | |
| 2044 ("e==" ["e="]) | |
| 2045 ("g//" ["g/"]) | |
| 2046 ("g^^" ["g^"]) | |
| 2047 ("g``" ["g`"]) | |
| 2048 ("g~~" ["g~"]) | |
| 2049 ("h//" ["h/"]) | |
| 2050 ("h^^" ["h^"]) | |
| 2051 ("i''" ["i'"]) | |
| 2052 ("i--" ["i-"]) | |
| 2053 ("i//" ["i/"]) | |
| 2054 ("i\"\"" ["i\""]) | |
| 2055 ("i^^" ["i^"]) | |
| 2056 ("i``" ["i`"]) | |
| 2057 ("i~~" ["i~"]) | |
| 2058 ("j^^" ["j^"]) | |
| 2059 ("k//" ["k/"]) | |
| 2060 ("k``" ["k`"]) | |
| 2061 ("l''" ["l'"]) | |
| 2062 ("l//" ["l/"]) | |
| 2063 ("l``" ["l`"]) | |
| 2064 ("l~~" ["l~"]) | |
| 2065 ("n''" ["n'"]) | |
| 2066 ("n//" ["n/"]) | |
| 2067 ("n``" ["n`"]) | |
| 2068 ("n~~" ["n~"]) | |
| 2069 ("o''" ["o'"]) | |
| 2070 ("o--" ["o-"]) | |
| 2071 ("o//" ["o/"]) | |
| 2072 ("o::" ["o:"]) | |
| 2073 ("o\"\"" ["o\""]) | |
| 2074 ("o^^" ["o^"]) | |
| 2075 ("o__" ["o_"]) | |
| 2076 ("o``" ["o`"]) | |
| 2077 ("o~~" ["o~"]) | |
| 2078 ("r''" ["r'"]) | |
| 2079 ("r``" ["r`"]) | |
| 2080 ("r~~" ["r~"]) | |
| 2081 ("s''" ["s'"]) | |
| 2082 ("s//" ["s/"]) | |
| 2083 ("s^^" ["s^"]) | |
| 2084 ("s``" ["s`"]) | |
| 2085 ("s~~" ["s~"]) | |
| 2086 ("t//" ["t/"]) | |
| 2087 ("t``" ["t`"]) | |
| 2088 ("t~~" ["t~"]) | |
| 2089 ("u''" ["u'"]) | |
| 2090 ("u--" ["u-"]) | |
| 2091 ("u::" ["u:"]) | |
| 2092 ("u\"\"" ["u\""]) | |
| 2093 ("u^^" ["u^"]) | |
| 2094 ("u``" ["u`"]) | |
| 2095 ("u~~" ["u~"]) | |
| 2096 ("y''" ["y'"]) | |
| 2097 ("y\"\"" ["y\""]) | |
| 2098 ("z''" ["z'"]) | |
| 2099 ("z//" ["z/"]) | |
| 2100 ("z``" ["z`"]) | |
| 2101 ("z~~" ["z~"]) | |
| 2102 ) | |
| 2103 | |
| 52401 | 2104 ;;; arch-tag: 722466a6-363d-431c-9161-879e16e2da5d |
|
38453
519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
Pavel Janík <Pavel@Janik.cz>
parents:
34937
diff
changeset
|
2105 ;;; latin-alt.el ends here |