annotate lisp/quail/quail-greek.el @ 123:c77884c6318d

Added tag r20-1b14 for changeset d2f30a177268
author cvs
date Mon, 13 Aug 2007 09:26:04 +0200
parents 131b0175ea99
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
70
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
1 ;;; 92.8.8 created for Mule Ver.0.9.5 by T.Matsuzawa <mzw_t@yhp.hp.com>
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
2 ;;; 92.12.28 modified for Mule ver.0.9.7 by Takahashi N. <ntakahas@etl.go.jp>
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
3 ;;; 93.4.22 modified by Takahashi N. <ntakahas@etl.go.jp"
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
4 ;;; added "jis-greek".
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
5 (require 'quail)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
6
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
7 (quail-define-package "jis-greek" "$B&%&K&K&G&M&I&J&A(B" nil
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
8 "JIS X0208.1983 encoding.
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
9 The layout is same as greek, but uses JIS characters.
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
10 Sorry, accents and terminal sigma are not supported in JIS." nil t t t t)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
11
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
12 (quail-defrule "1" ?$B#1(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
13 (quail-defrule "2" ?$B#2(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
14 (quail-defrule "3" ?$B#3(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
15 (quail-defrule "4" ?$B#4(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
16 (quail-defrule "5" ?$B#5(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
17 (quail-defrule "6" ?$B#6(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
18 (quail-defrule "7" ?$B#7(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
19 (quail-defrule "8" ?$B#8(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
20 (quail-defrule "9" ?$B#9(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
21 (quail-defrule "0" ?$B#0(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
22 (quail-defrule "-" ?$B!](B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
23 (quail-defrule "=" ?$B!a(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
24 (quail-defrule "`" ?$B!F(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
25 (quail-defrule "q" ?$B!&(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
26 (quail-defrule "w" ?$B&R(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
27 (quail-defrule "e" ?$B&E(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
28 (quail-defrule "r" ?$B&Q(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
29 (quail-defrule "t" ?$B&S(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
30 (quail-defrule "y" ?$B&T(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
31 (quail-defrule "u" ?$B&H(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
32 (quail-defrule "i" ?$B&I(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
33 (quail-defrule "o" ?$B&O(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
34 (quail-defrule "p" ?$B&P(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
35 (quail-defrule "[" ?$B!N(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
36 (quail-defrule "]" ?$B!O(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
37 (quail-defrule "a" ?$B&A(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
38 (quail-defrule "s" ?$B&R(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
39 (quail-defrule "d" ?$B&D(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
40 (quail-defrule "f" ?$B&U(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
41 (quail-defrule "g" ?$B&C(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
42 (quail-defrule "h" ?$B&G(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
43 (quail-defrule "j" ?$B&N(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
44 (quail-defrule "k" ?$B&J(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
45 (quail-defrule "l" ?$B&K(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
46 (quail-defrule ";" ?$B!G(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
47 (quail-defrule "'" ?$B!G(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
48 (quail-defrule "\\" ?$B!@(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
49 (quail-defrule "z" ?$B&F(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
50 (quail-defrule "x" ?$B&V(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
51 (quail-defrule "c" ?$B&W(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
52 (quail-defrule "v" ?$B&X(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
53 (quail-defrule "b" ?$B&B(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
54 (quail-defrule "n" ?$B&M(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
55 (quail-defrule "m" ?$B&L(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
56 (quail-defrule "," ?, )
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
57 (quail-defrule "." ?. )
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
58 (quail-defrule "/" ?$B!?(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
59
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
60 (quail-defrule "!" ?$B!*(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
61 (quail-defrule "@" ?$B!w(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
62 (quail-defrule "#" ?$B!t(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
63 (quail-defrule "$" ?$B!t(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
64 (quail-defrule "%" ?$B!s(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
65 (quail-defrule "^" ?$B!0(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
66 (quail-defrule "&" ?$B!u(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
67 (quail-defrule "*" ?$B!v(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
68 (quail-defrule "(" ?$B!J(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
69 (quail-defrule ")" ?$B!K(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
70 (quail-defrule "_" ?$B!2(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
71 (quail-defrule "+" ?$B!\(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
72 (quail-defrule "~" ?$B!1(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
73 (quail-defrule "Q" ?$B!](B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
74 (quail-defrule "W" ?$B&2(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
75 (quail-defrule "E" ?$B&%(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
76 (quail-defrule "R" ?$B&1(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
77 (quail-defrule "T" ?$B&3(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
78 (quail-defrule "Y" ?$B&4(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
79 (quail-defrule "U" ?$B&((B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
80 (quail-defrule "I" ?$B&)(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
81 (quail-defrule "O" ?$B&/(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
82 (quail-defrule "P" ?$B&1(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
83 (quail-defrule "{" ?$B!P(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
84 (quail-defrule "}" ?$B!Q(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
85 (quail-defrule "A" ?$B&!(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
86 (quail-defrule "S" ?$B&2(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
87 (quail-defrule "D" ?$B&$(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
88 (quail-defrule "F" ?$B&5(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
89 (quail-defrule "G" ?$B&#(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
90 (quail-defrule "H" ?$B&'(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
91 (quail-defrule "J" ?$B&.(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
92 (quail-defrule "K" ?$B&*(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
93 (quail-defrule "L" ?$B&+(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
94 (quail-defrule ":" ?$B!I(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
95 (quail-defrule "\"" ?$B!I(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
96 (quail-defrule "|" ?$B!C(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
97 (quail-defrule "Z" ?$B&&(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
98 (quail-defrule "X" ?$B&6(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
99 (quail-defrule "C" ?$B&7(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
100 (quail-defrule "V" ?$B&8(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
101 (quail-defrule "B" ?$B&"(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
102 (quail-defrule "N" ?$B&-(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
103 (quail-defrule "M" ?$B&,(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
104 (quail-defrule "<" ?$B!((B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
105 (quail-defrule ">" ?$B!'(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
106 (quail-defrule "?" ?$B!)(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
107
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
108 (quail-setup-current-package)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
109 ;;;
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
110
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
111 (quail-define-package "greek" ",FEkkgmij\(B" nil "Greek Keyboard
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
112 --------------
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
113
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
114 In the right of ,Fk(B key is a combination key, where
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
115 ,F4(B acute
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
116 ,F((B diaresis
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
117
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
118 e.g.
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
119 ,Fa(B + ,F4(B -> ,F\(B
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
120 ,Fi(B + ,F((B -> ,Fz(B
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
121 ,Fi(B + ,F((B + ,F4(B -> ,F@(B
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
122 " nil t t t t)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
123
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
124 ;; 1! 2@ 3# 4$ 5% 6^ 7& 8* 9( 0) -_ =+ `~
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
125 ;; ,F7/(B ,FrS(B ,FeE(B ,FqQ(B ,FtT(B ,FuU(B ,FhH(B ,FiI(B ,FoO(B ,FpP(B [{ ]}
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
126 ;; ,FaA(B ,FsS(B ,FdD(B ,FvV(B ,FcC(B ,FgG(B ,FnN(B ,FjJ(B ,FkK(B ,F4((B '" \|
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
127 ;; ,FfF(B ,FwW(B ,FxX(B ,FyY(B ,FbB(B ,FmM(B ,FlL(B ,; .: /?
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
128
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
129 (quail-defrule "1" ?1)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
130 (quail-defrule "2" ?2)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
131 (quail-defrule "3" ?3)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
132 (quail-defrule "4" ?4)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
133 (quail-defrule "5" ?5)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
134 (quail-defrule "6" ?6)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
135 (quail-defrule "7" ?7)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
136 (quail-defrule "8" ?8)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
137 (quail-defrule "9" ?9)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
138 (quail-defrule "0" ?0)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
139 (quail-defrule "-" ?-)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
140 (quail-defrule "=" ?=)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
141 (quail-defrule "`" ?`)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
142 (quail-defrule "q" ?,F7(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
143 (quail-defrule "w" ?,Fr(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
144 (quail-defrule "e" ?,Fe(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
145 (quail-defrule "r" ?,Fq(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
146 (quail-defrule "t" ?,Ft(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
147 (quail-defrule "y" ?,Fu(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
148 (quail-defrule "u" ?,Fh(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
149 (quail-defrule "i" ?,Fi(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
150 (quail-defrule "o" ?,Fo(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
151 (quail-defrule "p" ?,Fp(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
152 (quail-defrule "[" ?[)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
153 (quail-defrule "]" ?])
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
154 (quail-defrule "a" ?,Fa(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
155 (quail-defrule "s" ?,Fs(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
156 (quail-defrule "d" ?,Fd(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
157 (quail-defrule "f" ?,Fv(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
158 (quail-defrule "g" ?,Fc(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
159 (quail-defrule "h" ?,Fg(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
160 (quail-defrule "j" ?,Fn(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
161 (quail-defrule "k" ?,Fj(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
162 (quail-defrule "l" ?,Fk(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
163 (quail-defrule ";" ?,F4(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
164 (quail-defrule "'" ?')
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
165 (quail-defrule "\\" ?\\)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
166 (quail-defrule "z" ?,Ff(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
167 (quail-defrule "x" ?,Fw(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
168 (quail-defrule "c" ?,Fx(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
169 (quail-defrule "v" ?,Fy(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
170 (quail-defrule "b" ?,Fb(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
171 (quail-defrule "n" ?,Fm(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
172 (quail-defrule "m" ?,Fl(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
173 (quail-defrule "," ?,)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
174 (quail-defrule "." ?.)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
175 (quail-defrule "/" ?/)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
176
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
177 (quail-defrule "!" ?!)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
178 (quail-defrule "@" ?@)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
179 (quail-defrule "#" ?#)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
180 (quail-defrule "$" ?$)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
181 (quail-defrule "%" ?%)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
182 (quail-defrule "^" ?^)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
183 (quail-defrule "&" ?&)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
184 (quail-defrule "*" ?*)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
185 (quail-defrule "(" ?()
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
186 (quail-defrule ")" ?))
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
187 (quail-defrule "_" ?_)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
188 (quail-defrule "+" ?+)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
189 (quail-defrule "~" ?~)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
190 (quail-defrule "Q" ?,F/(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
191 (quail-defrule "W" ?,FS(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
192 (quail-defrule "E" ?,FE(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
193 (quail-defrule "R" ?,FQ(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
194 (quail-defrule "T" ?,FT(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
195 (quail-defrule "Y" ?,FU(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
196 (quail-defrule "U" ?,FH(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
197 (quail-defrule "I" ?,FI(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
198 (quail-defrule "O" ?,FO(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
199 (quail-defrule "P" ?,FP(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
200 (quail-defrule "{" ?{)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
201 (quail-defrule "}" ?})
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
202 (quail-defrule "A" ?,FA(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
203 (quail-defrule "S" ?,FS(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
204 (quail-defrule "D" ?,FD(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
205 (quail-defrule "F" ?,FV(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
206 (quail-defrule "G" ?,FC(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
207 (quail-defrule "H" ?,FG(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
208 (quail-defrule "J" ?,FN(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
209 (quail-defrule "K" ?,FJ(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
210 (quail-defrule "L" ?,FK(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
211 (quail-defrule ":" ?,F((B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
212 (quail-defrule "\"" ?\")
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
213 (quail-defrule "|" ?|)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
214 (quail-defrule "Z" ?,FF(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
215 (quail-defrule "X" ?,FW(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
216 (quail-defrule "C" ?,FX(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
217 (quail-defrule "V" ?,FY(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
218 (quail-defrule "B" ?,FB(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
219 (quail-defrule "N" ?,FM(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
220 (quail-defrule "M" ?,FL(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
221 (quail-defrule "<" ?;)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
222 (quail-defrule ">" ?:)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
223 (quail-defrule "?" ??)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
224
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
225 (quail-defrule "a;" ?,F\(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
226 (quail-defrule "e;" ?,F](B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
227 (quail-defrule "h;" ?,F^(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
228 (quail-defrule "i;" ?,F_(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
229 (quail-defrule "o;" ?,F|(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
230 (quail-defrule "y;" ?,F}(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
231 (quail-defrule "v;" ?,F~(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
232 (quail-defrule "A;" ?,F6(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
233 (quail-defrule "E;" ?,F8(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
234 (quail-defrule "H;" ?,F9(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
235 (quail-defrule "I;" ?,F:(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
236 (quail-defrule "O;" ?,F<(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
237 (quail-defrule "Y;" ?,F>(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
238 (quail-defrule "V;" ?,F?(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
239 (quail-defrule "i:" ?,Fz(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
240 (quail-defrule "y:" ?,F{(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
241 (quail-defrule "I:" ?,FZ(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
242 (quail-defrule "Y:" ?,F[(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
243 (quail-defrule "i:;" ?,F@(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
244 (quail-defrule "y:;" ?,F`(B)
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
245
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents:
diff changeset
246 (quail-setup-current-package)