# HG changeset patch # User Kenichi Handa # Date 873265567 0 # Node ID dd39cae4cf0fd930ac463002e6e820936c47e69f # Parent c687ce4ca98e8f5de2ce85cd7d2df31128a707ba For each package, pass t for the SIMPLE argument to quail-define-package. diff -r c687ce4ca98e -r dd39cae4cf0f leim/quail/cyril-jis.el --- a/leim/quail/cyril-jis.el Wed Sep 03 02:25:42 1997 +0000 +++ b/leim/quail/cyril-jis.el Wed Sep 03 05:46:07 1997 +0000 @@ -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 diff -r c687ce4ca98e -r dd39cae4cf0f leim/quail/cyrillic.el --- a/leim/quail/cyrillic.el Wed Sep 03 02:25:42 1997 +0000 +++ b/leim/quail/cyrillic.el Wed Sep 03 05:46:07 1997 +0000 @@ -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 @@ 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 @@ 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-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) diff -r c687ce4ca98e -r dd39cae4cf0f leim/quail/greek.el --- a/leim/quail/greek.el Wed Sep 03 02:25:42 1997 +0000 +++ b/leim/quail/greek.el Wed Sep 03 05:46:07 1997 +0000 @@ -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 @@ ,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 [{ ]} diff -r c687ce4ca98e -r dd39cae4cf0f leim/quail/ipa.el --- a/leim/quail/ipa.el Wed Sep 03 02:25:42 1997 +0000 +++ b/leim/quail/ipa.el Wed Sep 03 05:46:07 1997 +0000 @@ -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) diff -r c687ce4ca98e -r dd39cae4cf0f leim/quail/lao.el --- a/leim/quail/lao.el Wed Sep 03 02:25:42 1997 +0000 +++ b/leim/quail/lao.el Wed Sep 03 05:46:07 1997 +0000 @@ -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) diff -r c687ce4ca98e -r dd39cae4cf0f leim/quail/lrt.el --- a/leim/quail/lrt.el Wed Sep 03 02:25:42 1997 +0000 +++ b/leim/quail/lrt.el Wed Sep 03 05:46:07 1997 +0000 @@ -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) diff -r c687ce4ca98e -r dd39cae4cf0f leim/quail/thai.el --- a/leim/quail/thai.el Wed Sep 03 02:25:42 1997 +0000 +++ b/leim/quail/thai.el Wed Sep 03 05:46:07 1997 +0000 @@ -189,7 +189,7 @@ ',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 @@ (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" "=") diff -r c687ce4ca98e -r dd39cae4cf0f leim/quail/viqr.el --- a/leim/quail/viqr.el Wed Sep 03 02:25:42 1997 +0000 +++ b/leim/quail/viqr.el Wed Sep 03 05:46:07 1997 +0000 @@ -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)