Mercurial > emacs

changeset 19722:dd39cae4cf0f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
For each package, pass t for the SIMPLE argument to quail-define-package.
author Kenichi Handa <handa@m17n.org>
date Wed, 03 Sep 1997 05:46:07 +0000
parents c687ce4ca98e
children 3ada64a43911
files leim/quail/cyril-jis.el leim/quail/cyrillic.el leim/quail/greek.el leim/quail/ipa.el leim/quail/lao.el leim/quail/lrt.el leim/quail/thai.el leim/quail/viqr.el
diffstat 8 files changed, 19 insertions(+), 17 deletions(-) [+]
line wrap: on
line diff
--- 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
--- 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) 
--- 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  [{  ]}
--- 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)
--- 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)
--- 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)
 
--- 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" "=")
--- 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)