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