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