mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-08 15:35:02 +00:00
Code Issues Releases Activity
9d458fde49
emacs/leim/quail/latin-alt.el

1535 lines
29 KiB
EmacsLisp
Raw Normal View History

Some fixes to follow lisp coding conventions and typo fixes.
2001-07-16 20:22:24 +00:00
;;; latin-alt.el --- Quail packages for inputting various European characters
Initial revision
1997-09-13 04:32:07 +00:00
;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
;; Keywords: multilingual, input method, latin
;; This file is part of GNU Emacs.
;; GNU Emacs is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation; either version 2, or (at your option)
;; any later version.
;; GNU Emacs is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; GNU General Public License for more details.
;; You should have received a copy of the GNU General Public License
;; along with GNU Emacs; see the file COPYING. If not, write to the
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.
;; Author: TAKAHASHI Naoto <ntakahas@etl.go.jp>
Some fixes to follow lisp coding conventions and typo fixes.
2001-07-16 20:22:24 +00:00
;;; Commentary:
;;; Code:
Initial revision
1997-09-13 04:32:07 +00:00
(require 'quail)
(quail-define-package
"latin-1-alt-postfix" "Latin-1" "1<" t
"Latin-1 character input method with postfix modifiers
| postfix | examples
------------+---------+----------
acute | ' | a' -> ,Aa(B
grave | ` | a` -> ,A`(B
circumflex | ^ | a^ -> ,Ab(B
diaeresis | \" | a\" -> ,Ad(B
tilde | ~ | a~ -> ,Ac(B
cedilla | / | c/ -> ,Ag(B
nordic | / | d/ -> ,Ap(B t/ -> ,A~(B a/ -> ,Ae(B e/ -> ,Af(B o/ -> ,Ax(B
("latin-1-alt-postfix"): Add a method to enter the small superscript underlined o and a. ("italian-alt-postfix"): Change it to something useful and different from italian-postfix.
1998-10-13 15:41:11 +00:00
others | /<> | s/ -> ,A_(B ?/ -> ,A?(B !/ -> ,A!(B
| various | << -> ,A+(B >> -> ,A;(B o_ -> ,A:(B a_ -> ,A*(B
Initial revision
1997-09-13 04:32:07 +00:00
It would be natural to use comma for cedillas, but that would be
inconvenient in practice because commas are needed very often after a
letter.
Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
" nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("A`" ?,A@(B)
("A'" ?,AA(B)
("A^" ?,AB(B)
("A~" ?,AC(B)
("A\"" ?,AD(B)
("A/" ?,AE(B)
("a`" ?,A`(B)
("a'" ?,Aa(B)
("a^" ?,Ab(B)
("a~" ?,Ac(B)
("a\"" ?,Ad(B)
("a/" ?,Ae(B)
("E`" ?,AH(B)
("E'" ?,AI(B)
("E^" ?,AJ(B)
("E\"" ?,AK(B)
("E/" ?,AF(B)
("e`" ?,Ah(B)
("e'" ?,Ai(B)
("e^" ?,Aj(B)
("e\"" ?,Ak(B)
("e/" ?,Af(B)
("I`" ?,AL(B)
("i`" ?,Al(B)
("I'" ?,AM(B)
("i'" ?,Am(B)
("I^" ?,AN(B)
("i^" ?,An(B)
("I\"" ?,AO(B)
("i\"" ?,Ao(B)
("O`" ?,AR(B)
("o`" ?,Ar(B)
("O'" ?,AS(B)
("o'" ?,As(B)
("O^" ?,AT(B)
("o^" ?,At(B)
("O~" ?,AU(B)
("o~" ?,Au(B)
("O\"" ?,AV(B)
("o\"" ?,Av(B)
("O/" ?,AX(B)
("o/" ?,Ax(B)
("U`" ?,AY(B)
("u`" ?,Ay(B)
("U'" ?,AZ(B)
("u'" ?,Az(B)
("U^" ?,A[(B)
("u^" ?,A{(B)
("U\"" ?,A\(B)
("u\"" ?,A|(B)
("Y'" ?,A](B)
("y'" ?,A}(B)
("y\"" ?,A(B)
("D/" ?,AP(B)
("d/" ?,Ap(B)
("T/" ?,A^(B)
("t/" ?,A~(B)
("s/" ?,A_(B)
("C/" ?,AG(B)
("c/" ?,Ag(B)
("N~" ?,AQ(B)
("n~" ?,Aq(B)
("?/" ?,A?(B)
("!/" ?,A!(B)
("<<" ?,A+(B)
(">>" ?,A;(B)
("latin-1-alt-postfix"): Add a method to enter the small superscript underlined o and a. ("italian-alt-postfix"): Change it to something useful and different from italian-postfix.
1998-10-13 15:41:11 +00:00
("o_" ?,A:(B)
("a_" ?,A*(B)
Initial revision
1997-09-13 04:32:07 +00:00
("A``" ["A`"])
("A''" ["A'"])
("A^^" ["A^"])
("A~~" ["A~"])
("A\"\"" ["A\""])
("A//" ["A/"])
("a``" ["a`"])
("a''" ["a'"])
("a^^" ["a^"])
("a~~" ["a~"])
("a\"\"" ["a\""])
("a//" ["a/"])
("E``" ["E`"])
("E''" ["E'"])
("E^^" ["E^"])
("E\"\"" ["E\""])
("E//" ["E/"])
("e``" ["e`"])
("e''" ["e'"])
("e^^" ["e^"])
("e\"\"" ["e\""])
("e//" ["e/"])
("I``" ["I`"])
("i``" ["i`"])
("I''" ["I'"])
("i''" ["i'"])
("I^^" ["I^"])
("i^^" ["i^"])
("I\"\"" ["I\""])
("i\"\"" ["i\""])
("O``" ["O`"])
("o``" ["o`"])
("O''" ["O'"])
("o''" ["o'"])
("O^^" ["O^"])
("o^^" ["o^"])
("O~~" ["O~"])
("o~~" ["o~"])
("O\"\"" ["O\""])
("o\"\"" ["o\""])
("O//" ["O/"])
("o//" ["o/"])
("U``" ["U`"])
("u``" ["u`"])
("U''" ["U'"])
("u''" ["u'"])
("U^^" ["U^"])
("u^^" ["u^"])
("U\"\"" ["U\""])
("u\"\"" ["u\""])
("Y''" ["Y'"])
("y''" ["y'"])
("y\"\"" ["y\""])
("D//" ["D/"])
("d//" ["d/"])
("T//" ["T/"])
("t//" ["t/"])
("s//" ["s/"])
("C//" ["C/"])
("c//" ["c/"])
("N~~" ["N~"])
("n~~" ["n~"])
("?//" ["?/"])
("!//" ["!/"])
("<<<" ["<<"])
(">>>" [">>"])
("latin-1-alt-postfix"): Add a method to enter the small superscript underlined o and a. ("italian-alt-postfix"): Change it to something useful and different from italian-postfix.
1998-10-13 15:41:11 +00:00
("o__" ["o_"])
("a__" ["a_"])
Initial revision
1997-09-13 04:32:07 +00:00
)
(quail-define-package
"latin-2-alt-postfix" "Latin-2" "2<" t
"Latin-2 character input method with postfix modifiers
| postfix | examples
------------+---------+----------
acute | ' | a' -> ,Ba(B
ogonek | ` | a` -> ,B1(B
diaeresis | \" | a\" -> ,Bd(B
circumflex | ^ | a^ -> ,Bb(B
breve | ~ | a~ -> ,Bc(B
cedilla | ` | c` -> ,Bg(B
caron | ~ | c~ -> ,Bh(B
(latin-2-alt-postfix): Doc fix.
1998-04-14 10:30:58 +00:00
dbl. acute | : | o: -> ,Bu(B
Initial revision
1997-09-13 04:32:07 +00:00
ring | ` | u` -> ,By(B
dot | ` | z` -> ,B?(B
stroke | / | d/ -> ,Bp(B
others | / | s/ -> ,B_(B
It would be natural to use period and comma for dots/rings and
cedillas/ogoneks, but that would inconvenient in practice, because
periods and commas are needed very often after a letter.
Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
" nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("A'" ?,BA(B)
("A`" ?,B!(B)
("A\"" ?,BD(B)
("A^" ?,BB(B)
("A~" ?,BC(B)
("C'" ?,BF(B)
("C`" ?,BG(B)
("C~" ?,BH(B)
("D/" ?,BP(B)
("D~" ?,BO(B)
("E'" ?,BI(B)
("E`" ?,BJ(B)
("E\"" ?,BK(B)
("E~" ?,BL(B)
("I'" ?,BM(B)
("I^" ?,BN(B)
("L'" ?,BE(B)
("L/" ?,B#(B)
("L~" ?,B%(B)
("N'" ?,BQ(B)
("N~" ?,BR(B)
("O'" ?,BS(B)
(latin-2-postfix): Use : for double-acute again.
1997-09-15 20:04:22 +00:00
("O:" ?,BU(B)
Initial revision
1997-09-13 04:32:07 +00:00
("O\"" ?,BV(B)
("O^" ?,BT(B)
("R'" ?,B@(B)
("R~" ?,BX(B)
("S'" ?,B&(B)
("S`" ?,B*(B)
("S~" ?,B)(B)
("T`" ?,B^(B)
("T~" ?,B+(B)
("U'" ?,BZ(B)
(latin-2-postfix): Use : for double-acute again.
1997-09-15 20:04:22 +00:00
("U:" ?,B[(B)
Initial revision
1997-09-13 04:32:07 +00:00
("U\"" ?,B\(B)
("U`" ?,BY(B)
("Y'" ?,B](B)
("Z'" ?,B,(B)
("Z`" ?,B/(B)
("Z~" ?,B.(B)
("a'" ?,Ba(B)
("a`" ?,B1(B)
("a\"" ?,Bd(B)
("a^" ?,Bb(B)
("a~" ?,Bc(B)
("c'" ?,Bf(B)
("c`" ?,Bg(B)
("c~" ?,Bh(B)
("d/" ?,Bp(B)
("d~" ?,Bo(B)
("e'" ?,Bi(B)
("e`" ?,Bj(B)
("e\"" ?,Bk(B)
("e~" ?,Bl(B)
("i'" ?,Bm(B)
("i^" ?,Bn(B)
("l'" ?,Be(B)
("l/" ?,B3(B)
("l~" ?,B5(B)
("n'" ?,Bq(B)
("n~" ?,Br(B)
("o'" ?,Bs(B)
(latin-2-postfix): Use : for double-acute again.
1997-09-15 20:04:22 +00:00
("o:" ?,Bu(B)
Initial revision
1997-09-13 04:32:07 +00:00
("o\"" ?,Bv(B)
("o^" ?,Bt(B)
("r'" ?,B`(B)
("r~" ?,Bx(B)
("s'" ?,B6(B)
("s`" ?,B:(B)
("s/" ?,B_(B)
("s~" ?,B9(B)
("t`" ?,B~(B)
("t~" ?,B;(B)
("u'" ?,Bz(B)
(latin-2-postfix): Use : for double-acute again.
1997-09-15 20:04:22 +00:00
("u:" ?,B{(B)
Initial revision
1997-09-13 04:32:07 +00:00
("u\"" ?,B|(B)
("u`" ?,By(B)
("y'" ?,B}(B)
("z'" ?,B<(B)
("z`" ?,B?(B)
("z~" ?,B>(B)
("A''" ["A'"])
("A``" ["A`"])
("A\"\"" ["A\""])
("A^^" ["A^"])
("A~~" ["A~"])
("C''" ["C'"])
("C``" ["C`"])
("C~~" ["C~"])
("D//" ["D/"])
("D~~" ["D~"])
("E''" ["E'"])
("E``" ["E`"])
("E\"\"" ["E\""])
("E~~" ["E~"])
("I''" ["I'"])
("I^^" ["I^"])
("L''" ["L'"])
("L//" ["L/"])
("L~~" ["L~"])
("N''" ["N'"])
("N~~" ["N~"])
("O''" ["O'"])
("O::" ["O:"])
("O\"\"" ["O\""])
("O^^" ["O^"])
("R''" ["R'"])
("R~~" ["R~"])
("S''" ["S'"])
("S``" ["S`"])
("S~~" ["S~"])
("T``" ["T`"])
("T~~" ["T~"])
("U''" ["U'"])
("U::" ["U:"])
("U\"\"" ["U\""])
("U``" ["U`"])
("Y''" ["Y'"])
("Z''" ["Z'"])
("Z``" ["Z`"])
("Z~~" ["Z~"])
("a''" ["a'"])
("a``" ["a`"])
("a\"\"" ["a\""])
("a^^" ["a^"])
("a~~" ["a~"])
("c''" ["c'"])
("c``" ["c`"])
("c~~" ["c~"])
("d//" ["d/"])
("d~~" ["d~"])
("e''" ["e'"])
("e``" ["e`"])
("e\"\"" ["e\""])
("e~~" ["e~"])
("i''" ["i'"])
("i^^" ["i^"])
("l''" ["l'"])
("l//" ["l/"])
("l~~" ["l~"])
("n''" ["n'"])
("n~~" ["n~"])
("o''" ["o'"])
("o::" ["o:"])
("o\"\"" ["o\""])
("o^^" ["o^"])
("r''" ["r'"])
("r~~" ["r~"])
("s''" ["s'"])
("s``" ["s`"])
("s//" ["s/"])
("s~~" ["s~"])
("t``" ["t`"])
("t~~" ["t~"])
("u''" ["u'"])
("u::" ["u:"])
("u\"\"" ["u\""])
("u``" ["u`"])
("y''" ["y'"])
("z''" ["z'"])
("z``" ["z`"])
("z~~" ["z~"])
)
(quail-define-package
"latin-3-alt-postfix" "Latin-3" "3<" t
"Latin-3 character input method with postfix modifiers
| postfix | examples
------------+---------+----------
acute | ' | a' -> ,Ca(B
grave | ` | a` -> ,C`(B
circumflex | ^ | a^ -> ,Cb(B
diaeresis | \" | a\" -> ,Cd(B
dot | / | c/ -> ,Ce(B i/ -> ,C9(B I/ -> ,C)(B
cedilla | ` | c` -> ,Cg(B
breve | ~ | g~ -> ,C;(B
tilde | ~ | n~ -> ,Cq(B
stroke | / | h/ -> ,C1(B
others | / | s/ -> ,C_(B
It would be natural to use period and comma for dots and cedillas, but
that would inconvenient in practice, because periods and commas are
needed very often after a letter.
Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
" nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("A`" ?,C@(B)
("A'" ?,CA(B)
("A^" ?,CB(B)
("A\"" ?,CD(B)
("C/" ?,CE(B)
("C^" ?,CF(B)
("C`" ?,CG(B)
("E`" ?,CH(B)
("E'" ?,CI(B)
("E^" ?,CJ(B)
("E\"" ?,CK(B)
("G~" ?,C+(B)
("G/" ?,CU(B)
("G^" ?,CX(B)
("H/" ?,C!(B)
("H^" ?,C&(B)
("I/" ?,C)(B)
("I`" ?,CL(B)
("I'" ?,CM(B)
("I^" ?,CN(B)
("I\"" ?,CO(B)
("J^" ?,C,(B)
("N~" ?,CQ(B)
("O`" ?,CR(B)
("O'" ?,CS(B)
("O^" ?,CT(B)
("O\"" ?,CV(B)
("S`" ?,C*(B)
("S^" ?,C^(B)
("U`" ?,CY(B)
("U'" ?,CZ(B)
("U^" ?,C[(B)
("U\"" ?,C\(B)
("U~" ?,C](B)
("Z/" ?,C/(B)
("a`" ?,C`(B)
("a'" ?,Ca(B)
("a^" ?,Cb(B)
("a\"" ?,Cd(B)
("c/" ?,Ce(B)
("c^" ?,Cf(B)
("c`" ?,Cg(B)
("e`" ?,Ch(B)
("e'" ?,Ci(B)
("e^" ?,Cj(B)
("e\"" ?,Ck(B)
("g~" ?,C;(B)
("g/" ?,Cu(B)
("g^" ?,Cx(B)
("h/" ?,C1(B)
("h^" ?,C6(B)
("i/" ?,C9(B)
("i`" ?,Cl(B)
("i'" ?,Cm(B)
("i^" ?,Cn(B)
("i\"" ?,Co(B)
("j^" ?,C<(B)
("n~" ?,Cq(B)
("o`" ?,Cr(B)
("o'" ?,Cs(B)
("o^" ?,Ct(B)
("o\"" ?,Cv(B)
("s`" ?,C:(B)
("s/" ?,C_(B)
("s^" ?,C~(B)
("u`" ?,Cy(B)
("u'" ?,Cz(B)
("u^" ?,C{(B)
("u\"" ?,C|(B)
("u~" ?,C}(B)
("z/" ?,C?(B)
("A``" ["A`"])
("A''" ["A'"])
("A^^" ["A^"])
("A\"\"" ["A\""])
("C//" ["C/"])
("C^^" ["C^"])
("C``" ["C`"])
("E``" ["E`"])
("E''" ["E'"])
("E^^" ["E^"])
("E\"\"" ["E\""])
("G~~" ["G~"])
("G//" ["G/"])
("G^^" ["G^"])
("H//" ["H/"])
("H^^" ["H^"])
("I//" ["I/"])
("I``" ["I`"])
("I''" ["I'"])
("I^^" ["I^"])
("I\"\"" ["I\""])
("J^^" ["J^"])
("N~~" ["N~"])
("O``" ["O`"])
("O''" ["O'"])
("O^^" ["O^"])
("O\"\"" ["O\""])
("S``" ["S`"])
("S^^" ["S^"])
("U``" ["U`"])
("U''" ["U'"])
("U^^" ["U^"])
("U\"\"" ["U\""])
("U~~" ["U~"])
("Z//" ["Z/"])
("a``" ["a`"])
("a''" ["a'"])
("a^^" ["a^"])
("a\"\"" ["a\""])
("c//" ["c/"])
("c^^" ["c^"])
("c``" ["c`"])
("e``" ["e`"])
("e''" ["e'"])
("e^^" ["e^"])
("e\"\"" ["e\""])
("g~~" ["g~"])
("g//" ["g/"])
("g^^" ["g^"])
("h//" ["h/"])
("h^^" ["h^"])
("i//" ["i/"])
("i``" ["i`"])
("i''" ["i'"])
("i^^" ["i^"])
("i\"\"" ["i\""])
("j^^" ["j^"])
("n~~" ["n~"])
("o``" ["o`"])
("o''" ["o'"])
("o^^" ["o^"])
("o\"\"" ["o\""])
("s``" ["s`"])
("s//" ["s/"])
("s^^" ["s^"])
("u``" ["u`"])
("u''" ["u'"])
("u^^" ["u^"])
("u\"\"" ["u\""])
("u~~" ["u~"])
("z//" ["z/"])
)
(quail-define-package
"latin-4-alt-postfix" "Latin-4" "4<" t
"Latin-4 characters input method with postfix modifiers
| postfix | examples
------------+---------+----------
acute | ' | a' -> ,Da(B
circumflex | ^ | a^ -> ,Db(B
diaeresis | \" | a\" -> ,Dd(B
ogonek | ` | a` -> ,D1(B
macron | - | a- -> ,D`(B
tilde | ~ | a~ -> ,Dc(B
caron | ~ | c~ -> ,Dh(B
dot | ~ | e~ -> ,Dl(B
cedilla | ` | k` -> ,Ds(B g` -> ,D;(B
stroke | / | d/ -> ,Dp(B
nordic | / | a/ -> ,De(B e/ -> ,Df(B o/ -> ,Dx(B
others | / | s/ -> ,D_(B n/ -> ,D?(B k/ -> ,D"(B
It would be natural to use period and comma for dots and
cedillas/ogoneks, but that would inconvenient in practice, because
periods and commas are needed very often after a letter.
Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
" nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("A`" ?,D!(B)
("A-" ?,D@(B)
("A'" ?,DA(B)
("A^" ?,DB(B)
("A~" ?,DC(B)
("A\"" ?,DD(B)
("A/" ?,DE(B)
("C~" ?,DH(B)
("D/" ?,DP(B)
("E/" ?,DF(B)
("E-" ?,D*(B)
("E'" ?,DI(B)
("E`" ?,DJ(B)
("E\"" ?,DK(B)
("E~" ?,DL(B)
("G`" ?,D+(B)
("I~" ?,D%(B)
("I`" ?,DG(B)
("I'" ?,DM(B)
("I^" ?,DN(B)
("I-" ?,DO(B)
("K`" ?,DS(B)
("L`" ?,D&(B)
("N/" ?,D=(B)
("N`" ?,DQ(B)
("O-" ?,DR(B)
("O^" ?,DT(B)
("O~" ?,DU(B)
("O\"" ?,DV(B)
("O/" ?,DX(B)
("R`" ?,D#(B)
("S~" ?,D)(B)
("T/" ?,D,(B)
("U`" ?,DY(B)
("U'" ?,DZ(B)
("U^" ?,D[(B)
("U\"" ?,D\(B)
("U~" ?,D](B)
("U-" ?,D^(B)
("Z~" ?,D.(B)
("a`" ?,D1(B)
("a-" ?,D`(B)
("a'" ?,Da(B)
("a^" ?,Db(B)
("a~" ?,Dc(B)
("a\"" ?,Dd(B)
("a/" ?,De(B)
("c~" ?,Dh(B)
("d/" ?,Dp(B)
("e/" ?,Df(B)
("e-" ?,D:(B)
("e'" ?,Di(B)
("e`" ?,Dj(B)
("e\"" ?,Dk(B)
("e~" ?,Dl(B)
("g`" ?,D;(B)
("i~" ?,D5(B)
("i`" ?,Dg(B)
("i'" ?,Dm(B)
("i^" ?,Dn(B)
("i-" ?,Do(B)
("k/" ?,D"(B)
("k`" ?,Ds(B)
("l`" ?,D6(B)
("n/" ?,D?(B)
("n`" ?,Dq(B)
("o-" ?,Dr(B)
("o^" ?,Dt(B)
("o~" ?,Du(B)
("o\"" ?,Dv(B)
("o/" ?,Dx(B)
("r`" ?,D3(B)
("s/" ?,D_(B)
("s~" ?,D9(B)
("t/" ?,D<(B)
("u`" ?,Dy(B)
("u'" ?,Dz(B)
("u^" ?,D{(B)
("u\"" ?,D|(B)
("u~" ?,D}(B)
("u-" ?,D~(B)
("z~" ?,D>(B)
("A``" ["A`"])
("A--" ["A-"])
("A''" ["A'"])
("A^^" ["A^"])
("A~~" ["A~"])
("A\"\"" ["A\""])
("A//" ["A/"])
("C~~" ["C~"])
("D//" ["D/"])
("E//" ["E/"])
("E--" ["E-"])
("E''" ["E'"])
("E``" ["E`"])
("E\"\"" ["E\""])
("E~~" ["E~"])
("G``" ["G`"])
("I~~" ["I~"])
("I``" ["I`"])
("I''" ["I'"])
("I^^" ["I^"])
("I--" ["I-"])
("K``" ["K`"])
("L``" ["L`"])
("N//" ["N/"])
("N``" ["N`"])
("O--" ["O-"])
("O^^" ["O^"])
("O~~" ["O~"])
("O\"\"" ["O\""])
("O//" ["O/"])
("R``" ["R`"])
("S~~" ["S~"])
("T//" ["T/"])
("U``" ["U`"])
("U''" ["U'"])
("U^^" ["U^"])
("U\"\"" ["U\""])
("U~~" ["U~"])
("U--" ["U-"])
("Z~~" ["Z~"])
("a``" ["a`"])
("a--" ["a-"])
("a''" ["a'"])
("a^^" ["a^"])
("a~~" ["a~"])
("a\"\"" ["a\""])
("a//" ["a/"])
("c~~" ["c~"])
("d//" ["d/"])
("e//" ["e/"])
("e--" ["e-"])
("e''" ["e'"])
("e``" ["e`"])
("e\"\"" ["e\""])
("e~~" ["e~"])
("g``" ["g`"])
("i~~" ["i~"])
("i``" ["i`"])
("i''" ["i'"])
("i^^" ["i^"])
("i--" ["i-"])
("k//" ["k/"])
("k``" ["k`"])
("l``" ["l`"])
("n//" ["n/"])
("n``" ["n`"])
("o--" ["o-"])
("o^^" ["o^"])
("o~~" ["o~"])
("o\"\"" ["o\""])
("o//" ["o/"])
("r``" ["r`"])
("s//" ["s/"])
("s~~" ["s~"])
("t//" ["t/"])
("u``" ["u`"])
("u''" ["u'"])
("u^^" ["u^"])
("u\"\"" ["u\""])
("u~~" ["u~"])
("u--" ["u-"])
("z~~" ["z~"])
)
(quail-define-package
"latin-5-alt-postfix" "Latin-5" "5<" t
"Latin-5 characters input method with postfix modifiers
| postfix | examples
------------+---------+----------
acute | ' | a' -> ,Ma(B
grave | ` | a` -> ,M`(B
circumflex | ^ | a^ -> ,Mb(B
diaeresis | \" | a\" -> ,Md(B
tilde | ~ | a~ -> ,Mc(B
breve | ~ | g~ -> ,Mp(B
cedilla | ` | c` -> ,Mg(B
dot | / | i/ -> ,M}(B I/ -> ,M](B
nordic | / | a/ -> ,Me(B e/ -> ,Mf(B o/ -> ,Mx(B
others | / | s/ -> ,M_(B
It would be natural to use period and comma for dots and cedillas, but
that would inconvenient in practice, because periods and commas are
needed very often after a letter.
Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
" nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("A'" ?,MA(B)
("A/" ?,ME(B)
("A\"" ?,MD(B)
("A^" ?,MB(B)
("A`" ?,M@(B)
("A~" ?,MC(B)
("C`" ?,MG(B)
("E'" ?,MI(B)
("E/" ?,MF(B)
("E\"" ?,MK(B)
("E^" ?,MJ(B)
("E`" ?,MH(B)
("G~" ?,MP(B)
("I'" ?,MM(B)
("I/" ?,M](B)
("I\"" ?,MO(B)
("I^" ?,MN(B)
("I`" ?,ML(B)
("N~" ?,MQ(B)
("O'" ?,MS(B)
("O/" ?,MX(B)
("O\"" ?,MV(B)
("O^" ?,MT(B)
("O`" ?,MR(B)
("O~" ?,MU(B)
("S`" ?,M^(B)
("U'" ?,MZ(B)
("U\"" ?,M\(B)
("U^" ?,M[(B)
("U`" ?,MY(B)
("a'" ?,Ma(B)
("a/" ?,Me(B)
("a\"" ?,Md(B)
("a^" ?,Mb(B)
("a`" ?,M`(B)
("a~" ?,Mc(B)
("c`" ?,Mg(B)
("e'" ?,Mi(B)
("e/" ?,Mf(B)
("e\"" ?,Mk(B)
("e^" ?,Mj(B)
("e`" ?,Mh(B)
("g~" ?,Mp(B)
("i'" ?,Mm(B)
("i/" ?,M}(B)
("i\"" ?,Mo(B)
("i^" ?,Mn(B)
("i`" ?,Ml(B)
("n~" ?,Mq(B)
("o'" ?,Ms(B)
("o/" ?,Mx(B)
("o\"" ?,Mv(B)
("o^" ?,Mt(B)
("o`" ?,Mr(B)
("o~" ?,Mu(B)
("s`" ?,M~(B)
("s/" ?,M_(B)
("u'" ?,Mz(B)
("u\"" ?,M|(B)
("u^" ?,M{(B)
("u`" ?,My(B)
("y\"" ?,M(B)
("A''" ["A'"])
("A//" ["A/"])
("A\"\"" ["A\""])
("A^^" ["A^"])
("A``" ["A`"])
("A~~" ["A~"])
("C``" ["C`"])
("E''" ["E'"])
("E//" ["E/"])
("E\"\"" ["E\""])
("E^^" ["E^"])
("E``" ["E`"])
("G~~" ["G~"])
("I''" ["I'"])
("I//" ["I/"])
("I\"\"" ["I\""])
("I^^" ["I^"])
("I``" ["I`"])
("N~~" ["N~"])
("O''" ["O'"])
("O//" ["O/"])
("O\"\"" ["O\""])
("O^^" ["O^"])
("O``" ["O`"])
("O~~" ["O~"])
("S``" ["S`"])
("U''" ["U'"])
("U\"\"" ["U\""])
("U^^" ["U^"])
("U``" ["U`"])
("a''" ["a'"])
("a//" ["a/"])
("a\"\"" ["a\""])
("a^^" ["a^"])
("a``" ["a`"])
("a~~" ["a~"])
("c``" ["c`"])
("e''" ["e'"])
("e//" ["e/"])
("e\"\"" ["e\""])
("e^^" ["e^"])
("e``" ["e`"])
("g~~" ["g~"])
("i''" ["i'"])
("i//" ["i/"])
("i\"\"" ["i\""])
("i^^" ["i^"])
("i``" ["i`"])
("n~~" ["n~"])
("o''" ["o'"])
("o//" ["o/"])
("o\"\"" ["o\""])
("o^^" ["o^"])
("o``" ["o`"])
("o~~" ["o~"])
("s``" ["s`"])
("s//" ["s/"])
("u''" ["u'"])
("u\"\"" ["u\""])
("u^^" ["u^"])
("u``" ["u`"])
("y\"\"" ["y\""])
)
(quail-define-package
"danish-alt-postfix" "Latin-1" "DA<" t
"Danish input method (rule: AE -> ,AF(B, OE -> ,AX(B, AA -> ,AE(B, E' -> ,AI(B)
Doubling the postfix separates the letter and postfix: e.g. aee -> ae
"
nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("AE" ?,AF(B)
("ae" ?,Af(B)
("OE" ?,AX(B)
("oe" ?,Ax(B)
("AA" ?,AE(B)
("aa" ?,Ae(B)
("E'" ?,AI(B)
("e'" ?,Ai(B)
("AEE" ["AE"])
("aee" ["ae"])
("OEE" ["OE"])
("oee" ["oe"])
("AAA" ["AA"])
("aaa" ["aa"])
("E''" ["E'"])
("e''" ["e'"])
)
(quail-define-package
"esperanto-alt-postfix" "Latin-3" "EO<" t
"Esperanto input method with postfix modifiers
A following ^ or x will produce an accented character,
Doc fixes.
2001-01-01 17:24:10 +00:00
e.g. c^ -> ,Cf(B gx -> ,Cx(B u^ -> ,C}(B.
Initial revision
1997-09-13 04:32:07 +00:00
Doubling the postfix separates the letter and postfix,
e.g. a'' -> a'.
" nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("Cx" ?,CF(B)
("C^" ?,CF(B)
("cx" ?,Cf(B)
("c^" ?,Cf(B)
("Gx" ?,CX(B)
("G^" ?,CX(B)
("gx" ?,Cx(B)
("g^" ?,Cx(B)
("Hx" ?,C&(B)
("H^" ?,C&(B)
("hx" ?,C6(B)
("h^" ?,C6(B)
("Jx" ?,C,(B)
("J^" ?,C,(B)
("jx" ?,C<(B)
("j^" ?,C<(B)
("Sx" ?,C^(B)
("S^" ?,C^(B)
("sx" ?,C~(B)
("s^" ?,C~(B)
("Ux" ?,C](B)
("U^" ?,C](B)
("ux" ?,C}(B)
("u^" ?,C}(B)
("Cxx" ["Cx"])
("C^^" ["C^"])
("cxx" ["cx"])
("c^^" ["c^"])
("Gxx" ["Gx"])
("G^^" ["G^"])
("gxx" ["gx"])
("g^^" ["g^"])
("Hxx" ["Hx"])
("H^^" ["H^"])
("hxx" ["hx"])
("h^^" ["h^"])
("Jxx" ["Jx"])
("J^^" ["J^"])
("jxx" ["jx"])
("j^^" ["j^"])
("Sxx" ["Sx"])
("S^^" ["S^"])
("sxx" ["sx"])
("s^^" ["s^"])
("Uxx" ["Ux"])
("U^^" ["U^"])
("uxx" ["ux"])
("u^^" ["u^"])
)
(quail-define-package
"finnish-alt-postfix" "Latin-1" "FI<" t
"Finnish (Suomi) input method
AE -> ,AD(B
AEE -> AE
OE -> ,AV(B
OEE -> OE
"
nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("AE" ?,AD(B)
("ae" ?,Ad(B)
("OE" ?,AV(B)
("oe" ?,Av(B)
("AEE" ["AE"])
("aee" ["ae"])
("OEE" ["OE"])
("oee" ["oe"])
)
(quail-define-package
"french-alt-postfix" "Latin-1" "FR<" t
"French (Fran,Ag(Bais) input method with postfix modifiers
` pour grave, ' pour aigu, ^ pour circonflexe, et \" pour tr,Ai(Bma.
Doc fixes.
2001-01-01 17:24:10 +00:00
Par exemple: a` -> ,A`(B e' -> ,Ai(B.
Initial revision
1997-09-13 04:32:07 +00:00
,AG(B, ,A+(B, et ,A;(B sont produits par C/, <<, et >>.
En doublant la frappe des diacritiques, ils s'isoleront de la lettre.
Par exemple: e'' -> e'
<e dans l'o> n'est pas disponible."
nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("A`" ?,A@(B)
("A^" ?,AB(B)
("a`" ?,A`(B)
("a^" ?,Ab(B)
("E`" ?,AH(B)
("E'" ?,AI(B)
("E^" ?,AJ(B)
("E\"" ?,AK(B)
("e`" ?,Ah(B)
("e'" ?,Ai(B)
("e^" ?,Aj(B)
("e\"" ?,Ak(B)
("I^" ?,AN(B)
("I\"" ?,AO(B)
("i^" ?,An(B)
("i\"" ?,Ao(B)
("O^" ?,AT(B)
("o^" ?,At(B)
("U`" ?,AY(B)
("U^" ?,A[(B)
("U\"" ?,A\(B)
("u`" ?,Ay(B)
("u^" ?,A{(B)
("u\"" ?,A|(B)
("C/" ?,AG(B)
("c/" ?,Ag(B)
("<<" ?,A+(B)
(">>" ?,A;(B)
("A``" ["A`"])
("A^^" ["A^"])
("a``" ["a`"])
("a^^" ["a^"])
("E``" ["E`"])
("E''" ["E'"])
("E^^" ["E^"])
("E\"\"" ["E\""])
("e``" ["e`"])
("e''" ["e'"])
("e^^" ["e^"])
("e\"\"" ["e\""])
("I^^" ["I^"])
("I\"\"" ["I\""])
("i^^" ["i^"])
("i\"\"" ["i\""])
("O^^" ["O^"])
("o^^" ["o^"])
("U``" ["U`"])
("U^^" ["U^"])
("U\"\"" ["U\""])
("u``" ["u`"])
("u^^" ["u^"])
("u\"\"" ["u\""])
("C//" ["C/"])
("c//" ["c/"])
("<<<" ["<<"])
(">>>" [">>"])
)
(quail-define-package
"german-alt-postfix" "Latin-1" "DE<" t
"German (Deutsch) input method
ae -> ,Ad(B
aee -> ae
oe -> ,Av(B
oee -> oe
ue -> ,A|(B
uee -> ue
sz -> ,A_(B
szz -> sz
"
nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("AE" ?,AD(B)
("ae" ?,Ad(B)
("OE" ?,AV(B)
("oe" ?,Av(B)
("UE" ?,A\(B)
("ue" ?,A|(B)
("sz" ?,A_(B)
("AEE" ["AE"])
("aee" ["ae"])
("OEE" ["OE"])
("oee" ["oe"])
("UEE" ["UE"])
("uee" ["ue"])
("szz" ["sz"])
)
(quail-define-package
"icelandic-alt-postfix" "Latin-1" "IS<" t
"Icelandic (,AM(Bslenska) input method with postfix modifiers
A' -> ,AA(B
E' -> ,AI(B
I' -> ,AM(B
O' -> ,AS(B
U' -> ,AZ(B
Y' -> ,A](B
AE -> ,AF(B
OE -> ,AV(B
D/ -> ,AP(B (eth)
T/ -> ,A^(B (thorn)
Doubling the postfix separates the letter and postfix: e.g. a'' -> a'
" nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("A'" ?,AA(B)
("a'" ?,Aa(B)
("E'" ?,AI(B)
("e'" ?,Ai(B)
("I'" ?,AM(B)
("i'" ?,Am(B)
("O'" ?,AS(B)
("o'" ?,As(B)
("U'" ?,AZ(B)
("u'" ?,Az(B)
("Y'" ?,A](B)
("y'" ?,A}(B)
("AE" ?,AF(B)
("ae" ?,Af(B)
("OE" ?,AV(B)
("oe" ?,Av(B)
("D/" ?,AP(B)
("d/" ?,Ap(B)
("T/" ?,A^(B)
("t/" ?,A~(B)
("A''" ["A'"])
("a''" ["a'"])
("E''" ["E'"])
("e''" ["e'"])
("I''" ["I'"])
("i''" ["i'"])
("O''" ["O'"])
("o''" ["o'"])
("U''" ["U'"])
("u''" ["u'"])
("Y''" ["Y'"])
("y''" ["y'"])
("AEE" ["AE"])
("aee" ["ae"])
("OEE" ["OE"])
("oee" ["oe"])
("D//" ["D/"])
("d//" ["d/"])
("T//" ["T/"])
("t//" ["t/"])
)
(quail-define-package
"italian-alt-postfix" "Latin-1" "IT<" t
"Italian (Italiano) input method with postfix modifiers
("latin-1-alt-postfix"): Add a method to enter the small superscript underlined o and a. ("italian-alt-postfix"): Change it to something useful and different from italian-postfix.
1998-10-13 15:41:11 +00:00
a' -> ,Aa(B A' -> ,AA(B a` -> ,A`(B A` -> ,A@(B i^ -> ,An(B << -> ,A+(B
e' -> ,Ai(B E' -> ,AI(B e` -> ,Ah(B E` -> ,AH(B I^ -> ,AN(B >> -> ,A;(B
i' -> ,Am(B I' -> ,AM(B i` -> ,Al(B I` -> ,AL(B o_ -> ,A:(B
o' -> ,As(B O' -> ,AS(B o` -> ,Ar(B O` -> ,AR(B a_ -> ,A*(B
Add the Euro symbol to the italian-postfix and italian-alt-postfix input methods. The users with a latin-1 font will see the international currency symbol, those with a latin-15 (iso-8859-15) font will see the euro symbol.
2001-10-25 12:18:06 +00:00
u' -> ,Az(B U' -> ,AZ(B u` -> ,Ay(B U` -> ,AY(B E= -> ,A$(B
("latin-1-alt-postfix"): Add a method to enter the small superscript underlined o and a. ("italian-alt-postfix"): Change it to something useful and different from italian-postfix.
1998-10-13 15:41:11 +00:00
This method is for purists who like accents the old way.
Initial revision
1997-09-13 04:32:07 +00:00
Doubling the postfix separates the letter and postfix: e.g. a`` -> a`
" nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("A`" ?,A@(B)
("latin-1-alt-postfix"): Add a method to enter the small superscript underlined o and a. ("italian-alt-postfix"): Change it to something useful and different from italian-postfix.
1998-10-13 15:41:11 +00:00
("A'" ?,AA(B)
Initial revision
1997-09-13 04:32:07 +00:00
("a`" ?,A`(B)
("latin-1-alt-postfix"): Add a method to enter the small superscript underlined o and a. ("italian-alt-postfix"): Change it to something useful and different from italian-postfix.
1998-10-13 15:41:11 +00:00
("a'" ?,Aa(B)
Initial revision
1997-09-13 04:32:07 +00:00
("E`" ?,AH(B)
("latin-1-alt-postfix"): Add a method to enter the small superscript underlined o and a. ("italian-alt-postfix"): Change it to something useful and different from italian-postfix.
1998-10-13 15:41:11 +00:00
("E'" ?,AI(B)
Add the Euro symbol to the italian-postfix and italian-alt-postfix input methods. The users with a latin-1 font will see the international currency symbol, those with a latin-15 (iso-8859-15) font will see the euro symbol.
2001-10-25 12:18:06 +00:00
("E=" ?,A$(B)
Initial revision
1997-09-13 04:32:07 +00:00
("e`" ?,Ah(B)
("latin-1-alt-postfix"): Add a method to enter the small superscript underlined o and a. ("italian-alt-postfix"): Change it to something useful and different from italian-postfix.
1998-10-13 15:41:11 +00:00
("e'" ?,Ai(B)
Initial revision
1997-09-13 04:32:07 +00:00
("I`" ?,AL(B)
("i`" ?,Al(B)
("latin-1-alt-postfix"): Add a method to enter the small superscript underlined o and a. ("italian-alt-postfix"): Change it to something useful and different from italian-postfix.
1998-10-13 15:41:11 +00:00
("I'" ?,AM(B)
("i'" ?,Am(B)
("I^" ?,AN(B)
("i^" ?,An(B)
Initial revision
1997-09-13 04:32:07 +00:00
("O`" ?,AR(B)
("o`" ?,Ar(B)
("latin-1-alt-postfix"): Add a method to enter the small superscript underlined o and a. ("italian-alt-postfix"): Change it to something useful and different from italian-postfix.
1998-10-13 15:41:11 +00:00
("O'" ?,AS(B)
("o'" ?,As(B)
Initial revision
1997-09-13 04:32:07 +00:00
("U`" ?,AY(B)
("u`" ?,Ay(B)
("latin-1-alt-postfix"): Add a method to enter the small superscript underlined o and a. ("italian-alt-postfix"): Change it to something useful and different from italian-postfix.
1998-10-13 15:41:11 +00:00
("U'" ?,AZ(B)
("u'" ?,Az(B)
("<<" ?,A+(B)
(">>" ?,A;(B)
("o_" ?,A:(B)
("a_" ?,A*(B)
Initial revision
1997-09-13 04:32:07 +00:00
("A``" ["A`"])
("latin-1-alt-postfix"): Add a method to enter the small superscript underlined o and a. ("italian-alt-postfix"): Change it to something useful and different from italian-postfix.
1998-10-13 15:41:11 +00:00
("A''" ["A'"])
Initial revision
1997-09-13 04:32:07 +00:00
("a``" ["a`"])
("latin-1-alt-postfix"): Add a method to enter the small superscript underlined o and a. ("italian-alt-postfix"): Change it to something useful and different from italian-postfix.
1998-10-13 15:41:11 +00:00
("a''" ["a'"])
Initial revision
1997-09-13 04:32:07 +00:00
("E``" ["E`"])
("latin-1-alt-postfix"): Add a method to enter the small superscript underlined o and a. ("italian-alt-postfix"): Change it to something useful and different from italian-postfix.
1998-10-13 15:41:11 +00:00
("E''" ["E'"])
Add the Euro symbol to the italian-postfix and italian-alt-postfix input methods. The users with a latin-1 font will see the international currency symbol, those with a latin-15 (iso-8859-15) font will see the euro symbol.
2001-10-25 12:18:06 +00:00
("E==" ["E="])
Initial revision
1997-09-13 04:32:07 +00:00
("e``" ["e`"])
("latin-1-alt-postfix"): Add a method to enter the small superscript underlined o and a. ("italian-alt-postfix"): Change it to something useful and different from italian-postfix.
1998-10-13 15:41:11 +00:00
("e''" ["e'"])
Initial revision
1997-09-13 04:32:07 +00:00
("I``" ["I`"])
("i``" ["i`"])
("latin-1-alt-postfix"): Add a method to enter the small superscript underlined o and a. ("italian-alt-postfix"): Change it to something useful and different from italian-postfix.
1998-10-13 15:41:11 +00:00
("I''" ["I'"])
("i''" ["i'"])
("I^^" ["I^"])
("i^^" ["i^"])
Initial revision
1997-09-13 04:32:07 +00:00
("O``" ["O`"])
("o``" ["o`"])
("latin-1-alt-postfix"): Add a method to enter the small superscript underlined o and a. ("italian-alt-postfix"): Change it to something useful and different from italian-postfix.
1998-10-13 15:41:11 +00:00
("O''" ["O'"])
("o''" ["o'"])
Initial revision
1997-09-13 04:32:07 +00:00
("U``" ["U`"])
("u``" ["u`"])
("latin-1-alt-postfix"): Add a method to enter the small superscript underlined o and a. ("italian-alt-postfix"): Change it to something useful and different from italian-postfix.
1998-10-13 15:41:11 +00:00
("U''" ["U'"])
("u''" ["u'"])
("<<<" ["<<"])
(">>>" [">>"])
("o__" ["o_"])
("a__" ["a_"])
Initial revision
1997-09-13 04:32:07 +00:00
)
(quail-define-package
"norwegian-alt-postfix" "Latin-1" "NO<" t
"Norwegian (Norsk) input method (rule: AE->,AF(B, OE->,AX(B, AA->,AE(B, E'->,AI(B)
Doubling the postfix separates the letter and postfix: e.g. aee -> ae
"
nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("AE" ?,AF(B)
("ae" ?,Af(B)
("OE" ?,AX(B)
("oe" ?,Ax(B)
("AA" ?,AE(B)
("aa" ?,Ae(B)
("E'" ?,AI(B)
("e'" ?,Ai(B)
("AEE" ["AE"])
("aee" ["ae"])
("OEE" ["OE"])
("oee" ["oe"])
("AAA" ["AA"])
("aaa" ["aa"])
("E''" ["E'"])
("e''" ["e'"])
)
(quail-define-package
"scandinavian-alt-postfix" "Latin-1" "SC<" t
"Scandinavian input method with postfix modifiers
Supported languages are Swidish, Norwegian, Danish, and Finnish.
ae -> ,Af(B
oe -> ,Ax(B
aa -> ,Ae(B
a\" -> ,Ad(B
o\" -> ,Av(B
e' -> ,Ai(B
Doubling the postfix separates the letter and postfix:
Doc fixes.
2001-01-01 17:24:10 +00:00
aee -> ae o\"\" -> o\" etc.
Initial revision
1997-09-13 04:32:07 +00:00
" nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("AE" ?,AF(B)
("ae" ?,Af(B)
("OE" ?,AX(B)
("oe" ?,Ax(B)
("AA" ?,AE(B)
("aa" ?,Ae(B)
("A\"" ?,AD(B)
("a\"" ?,Ad(B)
("O\"" ?,AV(B)
("o\"" ?,Av(B)
("E'" ?,AI(B)
("e'" ?,Ai(B)
("AEE" ["AE"])
("aee" ["ae"])
("OEE" ["OE"])
("oee" ["oe"])
("AAA" ["AA"])
("aaa" ["aa"])
("A\"\"" ["A\""])
("a\"\"" ["a\""])
("O\"\"" ["O\""])
("o\"\"" ["o\""])
("E''" ["E'"])
("e''" ["e'"])
)
(quail-define-package
"spanish-alt-postfix" "Latin-1" "ES<" t
"Spanish (Espa,Aq(Bol) input method with postfix modifiers
A' -> ,AA(B
E' -> ,AI(B
I' -> ,AM(B
O' -> ,AS(B
U' -> ,AZ(B
N~ -> ,AQ(B
!/ -> ,A!(B
?/ -> ,A?(B
Doubling the postfix separates the letter and postfix:
Doc fixes.
2001-01-01 17:24:10 +00:00
a'' -> a' n~~ -> n~, etc.
Initial revision
1997-09-13 04:32:07 +00:00
" nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("A'" ?,AA(B)
("a'" ?,Aa(B)
("E'" ?,AI(B)
("e'" ?,Ai(B)
("I'" ?,AM(B)
("i'" ?,Am(B)
("O'" ?,AS(B)
("o'" ?,As(B)
("U'" ?,AZ(B)
("u'" ?,Az(B)
("N~" ?,AQ(B)
("n~" ?,Aq(B)
("?/" ?,A?(B)
("!/" ?,A!(B)
("A''" ["A'"])
("a''" ["a'"])
("E''" ["E'"])
("e''" ["e'"])
("I''" ["I'"])
("i''" ["i'"])
("O''" ["O'"])
("o''" ["o'"])
("U''" ["U'"])
("u''" ["u'"])
("N~~" ["N~"])
("n~~" ["n~"])
("?//" ["?/"])
("!//" ["!/"])
)
(quail-define-package
"swedish-alt-postfix" "Latin-1" "SV<" t
"Swedish (Svenska) input method (rule: AA -> ,AE(B, AE -> ,AD(B, OE -> ,AV(B, E' -> ,AI(B)
Doubling the postfix separates the letter and postfix: e.g. aee -> ae
" nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("AA" ?,AE(B)
("aa" ?,Ae(B)
("AE" ?,AD(B)
("ae" ?,Ad(B)
("OE" ?,AV(B)
("oe" ?,Av(B)
("E'" ?,AI(B)
("e'" ?,Ai(B)
("AAA" ["AA"])
("aaa" ["aa"])
("AEE" ["AE"])
("aee" ["ae"])
("OEE" ["OE"])
("oee" ["oe"])
("E''" ["E'"])
("e''" ["e'"])
)
(quail-define-package
("turkish-latin-3-alt-postfix"): Renamed from turkish-postfix. ("turkish-postfix"): New Turkish input method which inserts Latin-5 characters.
1999-09-20 02:11:10 +00:00
"turkish-latin-3-alt-postfix" "Latin-3" "TR3<<" t
Doc fixes.
2001-01-01 17:24:10 +00:00
"Turkish (T,C|(Brk,Cg(Be) input method with postfix modifiers.
Initial revision
1997-09-13 04:32:07 +00:00
("turkish-latin-3-alt-postfix"): Renamed from turkish-postfix. ("turkish-postfix"): New Turkish input method which inserts Latin-5 characters.
1999-09-20 02:11:10 +00:00
This is for those who use Latin-3 (ISO-8859-3) for Turkish. If you
Doc fixes.
2001-01-01 17:24:10 +00:00
use Latin-5 (ISO-8859-9), you should use \"turkish-alt-postfix\" instead.
("turkish-latin-3-alt-postfix"): Renamed from turkish-postfix. ("turkish-postfix"): New Turkish input method which inserts Latin-5 characters.
1999-09-20 02:11:10 +00:00
Initial revision
1997-09-13 04:32:07 +00:00
Note for I, ,C9(B, ,C)(B, i.
A^ -> ,CB(B
C` -> ,CG(B
G^ -> ,C+(B
I -> I
i -> ,C9(B
I/ -> ,C)(B
i/ -> i
O\" -> ,CV(B
S` -> ,C*(B
U\" -> ,C\(B
U^ -> ,C[(B
Doubling the postfix separates the letter and postfix: e.g. a^^ -> a^
" nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("A^" ?,CB(B)
("a^" ?,Cb(B)
("C`" ?,CG(B)
("c`" ?,Cg(B)
("G^" ?,C+(B)
("g^" ?,C;(B)
("I/" ?,C)(B)
("i" ?,C9(B)
("i/" ?i)
("O\"" ?,CV(B)
("o\"" ?,Cv(B)
("S`" ?,C*(B)
("s`" ?,C:(B)
("U\"" ?,C\(B)
("u\"" ?,C|(B)
("U^" ?,C[(B)
("u^" ?,C{(B)
("A^^" ["A^"])
("a^^" ["a^"])
("C``" ["C`"])
("c``" ["c`"])
("G^^" ["G^"])
("g^^" ["g^"])
("I//" ["I/"])
("i" ["i"])
("i//" ["i/"])
("O\"\"" ["O\""])
("o\"\"" ["o\""])
("S``" ["S`"])
("s``" ["s`"])
("U\"\"" ["U\""])
("u\"\"" ["u\""])
("U^^" ["U^"])
("u^^" ["u^"])
)
("turkish-latin-3-alt-postfix"): Renamed from turkish-postfix. ("turkish-postfix"): New Turkish input method which inserts Latin-5 characters.
1999-09-20 02:11:10 +00:00
(quail-define-package
"turkish-alt-postfix" "Latin-5" "TR,M+(B" t
Doc fixes.
2001-01-01 17:24:10 +00:00
"Turkish (T,M|(Brk,Mg(Be) input method with postfix modifiers.
("turkish-latin-3-alt-postfix"): Renamed from turkish-postfix. ("turkish-postfix"): New Turkish input method which inserts Latin-5 characters.
1999-09-20 02:11:10 +00:00
This is for those who use Latin-5 (ISO-8859-9) for Turkish. If you
use Latin-3 (ISO-8859-3), you should use
Doc fixes.
2001-01-01 17:24:10 +00:00
\"turkish-latin-3-alt-postfix\" instead.
("turkish-latin-3-alt-postfix"): Renamed from turkish-postfix. ("turkish-postfix"): New Turkish input method which inserts Latin-5 characters.
1999-09-20 02:11:10 +00:00
Note for I, ,M}(B, ,M](B, i.
A^ -> ,MB(B
C` -> ,MG(B
G^ -> ,MP(B
I -> I
i -> ,M}(B
I/ -> ,M](B
i/ -> i
O\" -> ,MV(B
S` -> ,M^(B
U\" -> ,M\(B
U^ -> ,M[(B
Doubling the postfix separates the letter and postfix: e.g. a^^ -> a^
" nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("A^" ?,MB(B)
("a^" ?,Mb(B)
("C`" ?,MG(B)
("c`" ?,Mg(B)
("G^" ?,MP(B)
("g^" ?,Mp(B)
("I/" ?,M](B)
("i" ?,M}(B)
("i/" ?i)
("O\"" ?,MV(B)
("o\"" ?,Cv(B)
("S`" ?,M^(B)
("s`" ?,M~(B)
("U\"" ?,M\(B)
("u\"" ?,M|(B)
("U^" ?,M[(B)
("u^" ?,M{(B)
("A^^" ["A^"])
("a^^" ["a^"])
("C``" ["C`"])
("c``" ["c`"])
("G^^" ["G^"])
("g^^" ["g^"])
("I//" ["I/"])
("i" ["i"])
("i//" ["i/"])
("O\"\"" ["O\""])
("o\"\"" ["o\""])
("S``" ["S`"])
("s``" ["s`"])
("U\"\"" ["U\""])
("u\"\"" ["u\""])
("U^^" ["U^"])
("u^^" ["u^"])
)
Some fixes to follow lisp coding conventions and typo fixes.
2001-07-16 20:22:24 +00:00
;;; latin-alt.el ends here
Reference in New Issue Copy Permalink