procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

For each package, pass t for the SIMPLE

Browse source 
argument to quail-define-package.
This commit is contained in:
Kenichi Handa 1997-09-03 05:46:07 +00:00
parent e26177cb6f
commit f10f03e8ee
8 changed files with 19 additions and 17 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
leim/quail/cyril-jis.el
View file

@ -33,7 +33,7 @@
(quail-define-package
"cyrillic-jis-russian" "Cyrillic" "$B'('+(B" nil
"$B'+'8'5','&'/(B keyboard layout same as JCUKEN (JIS X0208.1983 encoding)"
nil t t t t)
nil t t t t nil nil nil nil nil t)
;; 1! 2@ 3# 4" 5: 6, 7. 8* 9( 0) -_ =+ ,L!(B
;; ,L9(B ,LF(B ,LC(B ,L:(B ,L5(B ,L=(B ,L3(B ,LH(B ,LI(B ,L7(B ,LE(B ,Lj(B

17
leim/quail/cyrillic.el
View file

@ -29,7 +29,7 @@
(quail-define-package
"cyrillic-jcuken" "Cyrillic" ",L69(B" nil
",L9FC:5=(B keyboard layout widely used in Russia (ISO 8859-5 encoding)"
nil t t t t)
nil t t t t nil nil nil nil nil t)
;; 1! 2@ 3# 4" 5: 6, 7. 8* 9( 0) -_ =+ ,L!(B
;; ,L9(B ,LF(B ,LC(B ,L:(B ,L5(B ,L=(B ,L3(B ,LH(B ,LI(B ,L7(B ,LE(B ,Lj(B
@ -138,7 +138,7 @@
(quail-define-package
"cyrillic-macedonian" "Cyrillic" ",L6(BM" nil
",L)*5@B7(B-,L#,(B keyboard layout based on JUS.I.K1.004 (ISO 8859-5 encoding)"
nil t t t t)
nil t t t t nil nil nil nil nil t)
;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <>
;; ,L)(B ,L*(B ,L5(B ,L@(B ,LB(B ,L7(B ,LC(B ,L8(B ,L>(B ,L?(B ,LH(B ,L#(B
@ -247,7 +247,7 @@
(quail-define-package
"cyrillic-serbian" "Cyrillic" ",L6(BS" nil
",L)*5@B7(B-,L"+(B keyboard layout based on JUS.I.K1.005 (ISO 8859-5 encoding)"
nil t t t t)
nil t t t t nil nil nil nil nil t)
;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <>
;; ,L)(B ,L*(B ,L5(B ,L@(B ,LB(B ,L7(B ,LC(B ,L8(B ,L>(B ,L?(B ,LH(B ,L"(B
@ -356,7 +356,7 @@
(quail-define-package
"cyrillic-beylorussian" "Cyrillic" ",L6(BB" nil
",L)*5@B7(B-,L&.(B BEYLORUSSIAN (ISO 8859-5 encoding)"
nil t t t t)
nil t t t t nil nil nil nil nil t)
;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <>
;; ,L)(B ,L*(B ,L5(B ,L@(B ,LB(B ,L7(B ,LC(B ,L8(B ,L>(B ,L?(B ,LH(B ,L&(B
@ -467,7 +467,7 @@
",L$'5@B7(B-,L&.(B UKRAINIAN (ISO 8859-5 encoding)
Sorry, but 'ghe with upturn' is not included in ISO 8859-5"
nil t t t t)
nil t t t t nil nil nil nil nil t)
;; 1! 2" 3# 4$ 5% 6& 7' 8( 9) 0= /? +* <>
;; ,L$(B ,L'(B ,L5(B ,L@(B ,LB(B ,L7(B ,LC(B ,L8(B ,L>(B ,L?(B ,LH(B ,L&(B
@ -584,7 +584,7 @@ as follows.
keytop | Q W E R T Y U I O P A S D
--------+---------------------------------------
input | ,L"(B ,L#(B ,L$(B ,L%(B ,L&(B ,L'(B ,L((B ,L)(B ,L*(B ,L+(B ,L,(B ,L.(B ,L/(B"
nil t t t t)
nil t t t t nil nil nil nil nil t)
;; 1! 2,Lq(B 3,Lj(B 4,L!(B 5% 6^ 7& 8* 9( 0) -_ ,LG(B ,LN(B
;; ,LO(B ,L2(B ,L5(B ,L@(B ,LB(B ,LK(B ,LC(B ,L8(B ,L>(B ,L?(B ,LH(B ,LI(B
@ -745,7 +745,7 @@ Serbo-Croatian ,Lr(B (DJE) = \"/d\", ,L{(B (CHJE)= \"/ch\",
Macedonian ,Ls(B (GJE) = \"/g\", ,Lu(B (DZE) = \"/s\", ,L|(B (KJE) = \"/k\",
cyrillic ,Lv(B (I DECIMAL) = \"/i\", ,Lx(B (JE) = \"/j\",
,Ly(B (LJE) = \"/l\", ,Lz(B (NJE) = \"/n\" and ,L(B (DZE) =\"/z\"."
nil t t t t)
nil t t t t nil nil nil nil nil t)
(quail-define-rules
("a" ?,LP(B)("b" ?,LQ(B) ("v" ?,LR(B) ("w" ?,LR(B) ("g" ?,LS(B) ("d" ?,LT(B)
@ -793,7 +793,8 @@ cyrillic ,Lv(B (I DECIMAL) = \"/i\", ,Lx(B (JE) = \"/j\",
"cyrillic-translit-bulgarian" "Cyrillic" ",L6(Btb" nil
"Intuitively transliterated keyboard layout optimized for Bulgarian.
The only difference with cyrillic-translit is that \"sht\" translates as
,Li(B (SHCHA = Bulgarian SHT) insteat of ,Lhb(B (SH+T)." nil t t t t)
,Li(B (SHCHA = Bulgarian SHT) insteat of ,Lhb(B (SH+T)."
nil t t t t nil nil nil nil nil t)
(quail-define-rules
("a" ?,LP(B)("b" ?,LQ(B) ("v" ?,LR(B) ("w" ?,LR(B) ("g" ?,LS(B) ("d" ?,LT(B)

4
leim/quail/greek.el
View file

@ -32,7 +32,7 @@
The layout is same as greek, but uses JIS characters.
Sorry, accents and terminal sigma are not supported in JIS."
nil t t t t)
nil t t t t nil nil nil nil nil t)
(quail-define-rules
("1" ?$B#1(B)
@ -146,7 +146,7 @@ e.g.
,Fa(B + ,F4(B -> ,F\(B
,Fi(B + ,F((B -> ,Fz(B
,Fi(B + ,F((B + ,F4(B -> ,F@(B"
nil t t t t)
nil t t t t nil nil nil nil nil t)
;; 1! 2@ 3# 4$ 5% 6^ 7& 8* 9( 0) -_ =+ `~
;; ,F7/(B ,FrS(B ,FeE(B ,FqQ(B ,FtT(B ,FuU(B ,FhH(B ,FiI(B ,FoO(B ,FpP(B [{ ]}

2
leim/quail/ipa.el
View file

@ -31,7 +31,7 @@
"International Phonetic Alphabet for English, French, German and Italian
Upside-down characters are obtained by a preceding slash (/)."
nil t)
nil t nil nil nil nil nil nil nil nil t)
(quail-define-rules
("i" ?,0 (B)

2
leim/quail/lao.el
View file

@ -97,7 +97,7 @@
(quail-define-package
"lao" "Lao" "(1E(B" t
"Lao input method simulating Lao keyboard layout based on Thai TIS620"
nil t t t t)
nil t t t t nil nil nil nil nil t)
(defmacro lao-quail-define-rules (&rest rules)
(let ((l rules)

3
leim/quail/lrt.el
View file

@ -400,7 +400,8 @@
("^" . lrt-handle-tone-mark)
("+" . lrt-handle-tone-mark)
("~" . lrt-handle-tone-mark))
'forget-last-selection 'deterministic 'kbd-translate 'show-layout)
'forget-last-selection 'deterministic 'kbd-translate 'show-layout
nil nil nil nil nil t)
(lrt-generate-quail-map)

4
leim/quail/thai.el
View file

@ -189,7 +189,7 @@ The difference from the ordinal Thai keyboard:
',T_(B' and ',To(B' are assigned to '\\' and '|' respectively,
',T#(B' and ',T%(B' are assigned to '`' and '~' respectively,
Don't know where to assign characters ',Tz(B' and ',T{(B'."
nil t t nil t)
nil t t nil t nil nil nil nil nil t)
(thai-quail-define-rules 'kesmanee
("1" (",TE(B" . thai-consonant-input))
@ -296,7 +296,7 @@ The difference from the ordinal Thai keyboard:
(quail-define-package
"thai-pattachote" "Thai" ",T!;(B>" t
"Thai Pattachote input method with TIS620 keyboard layout"
nil t t nil t)
nil t t nil t nil nil nil nil nil t)
(thai-quail-define-rules 'pattachote
("1" "=")

2
leim/quail/viqr.el
View file

@ -61,7 +61,7 @@
no compose | \ | a\. -> a.
------------+---------+----------
combination| (~ | a(~ -> ,1G(B
" nil t t nil nil t)
" nil t t nil nil t nil nil nil nil t)
(viet-quail-define-rules)