[uim-commit] r2261 - trunk/scm

[ekato at freedesktop.org]

Author: ekato
Date: 2005-11-26 22:25:47 -0800 (Sat, 26 Nov 2005)
New Revision: 2261

Modified:
   trunk/scm/skk.scm
Log:
* scm/skk.scm (skk-proc-state-completion) : Set dcomp-word with
  skk-new-completion-from-current-comp-key.


Modified: trunk/scm/skk.scm
===================================================================
--- trunk/scm/skk.scm	2005-11-27 06:14:45 UTC (rev 2260)
+++ trunk/scm/skk.scm	2005-11-27 06:25:47 UTC (rev 2261)
@@ -1822,6 +1822,10 @@
 	     (if (not (null? sl))
 		 (skk-string-list-to-context-head sc sl))
 	     (skk-context-set-completion-nth! sc 0)
+	     (if skk-dcomp-activate?
+		 (skk-context-set-dcomp-word!
+		  sc
+		  (skk-get-current-completion sc)))
 	     #f)
 	   #t)
        (if (skk-cancel-key? key key-state)