[uim-commit] r2206 - in trunk: po scm

[ekato at freedesktop.org]

Author: ekato
Date: 2005-11-21 11:00:52 -0800 (Mon, 21 Nov 2005)
New Revision: 2206

Modified:
   trunk/po/ja.po
   trunk/scm/skk-key-custom.scm
Log:
* scm/skk-key-custom.scm (skk-keys-latin-conv) : New subgroup.
(skk-latin-conv-key) : Apply skk-keys-latin-conv attribute.
(skk-conv-wide-latin-key) : Ditto.
(skk-conv-opposite-case-key) : Ditto.

* po/ja.po : Update.


Modified: trunk/po/ja.po
===================================================================
--- trunk/po/ja.po	2005-11-21 18:20:57 UTC (rev 2205)
+++ trunk/po/ja.po	2005-11-21 19:00:52 UTC (rev 2206)
@@ -1885,7 +1885,7 @@
 
 #: scm/skk-key-custom.lisp:154
 msgid "[SKK] commit as opposite case in latin conversion"
-msgstr "[SKK] opposite case¤È¤·¤Æ³ÎÄê"
+msgstr "[SKK] Âçʸ»ú¤È¾®Ê¸»ú¤òÆþ¤ìÂؤ¨¤Æ³ÎÄê"
 
 #: scm/skk-key-custom.lisp:160
 msgid "[SKK] begin latin conversion"

Modified: trunk/scm/skk-key-custom.scm
===================================================================
--- trunk/scm/skk-key-custom.scm	2005-11-21 18:20:57 UTC (rev 2205)
+++ trunk/scm/skk-key-custom.scm	2005-11-21 19:00:52 UTC (rev 2206)
@@ -77,7 +77,11 @@
 		     (_ "Completion")
 		     (_ "long description will be here."))
 
+(define-custom-group 'skk-keys-latin-conv
+		     (_ "Latin conversion")
+		     (_ "long description will be here."))
 
+
 (define-custom 'skk-on-key '("<IgnoreCase><Control>j" generic-on-key)
                '(skk-keys1 mode-transition)
 	       '(key)
@@ -142,24 +146,24 @@
 	       (_ "[SKK] return")
 	       (_ "long description will be here"))
 
+(define-custom 'skk-latin-conv-key '("/")
+               '(skk-keys2 skk-keys-latin-conv)
+	       '(key)
+	       (_ "[SKK] begin latin conversion")
+	       (_ "long description will be here"))
+
 (define-custom 'skk-conv-wide-latin-key '("<IgnoreCase><Control>q")
-               '(skk-keys2)
+               '(skk-keys2 skk-keys-latin-conv)
 	       '(key)
 	       (_ "[SKK] commit as fullwidth alphanumeric")
 	       (_ "long description will be here"))
 
 (define-custom 'skk-conv-opposite-case-key '("<IgnoreCase><Control>u")
-               '(skk-keys2)
+               '(skk-keys2 skk-keys-latin-conv)
 	       '(key)
 	       (_ "[SKK] commit as opposite case in latin conversion")
 	       (_ "long description will be here"))
 
-(define-custom 'skk-latin-conv-key '("/")
-               '(skk-keys2)
-	       '(key)
-	       (_ "[SKK] begin latin conversion")
-	       (_ "long description will be here"))
-
 (define-custom 'skk-begin-completion-key '("tab" "<IgnoreCase><Control>i" skk-new-completion-from-current-comp-key)
                '(skk-keys2 skk-keys-completion)
 	       '(key)