[uim-commit] r1323 - trunk/scm

[ekato at freedesktop.org]

Author: ekato
Date: 2005-08-25 21:42:44 -0700 (Thu, 25 Aug 2005)
New Revision: 1323

Modified:
   trunk/scm/anthy.scm
Log:
* scm/anthy.scm (anthy-has-preedit?) : Use string-length instead of
  length.


Modified: trunk/scm/anthy.scm
===================================================================
--- trunk/scm/anthy.scm	2005-08-26 04:04:32 UTC (rev 1322)
+++ trunk/scm/anthy.scm	2005-08-26 04:42:44 UTC (rev 1323)
@@ -479,7 +479,7 @@
 (define anthy-has-preedit?
   (lambda (ac)
     (or (not (ustr-empty? (anthy-context-preconv-ustr ac)))
-	(> (length (rk-pending (anthy-context-rkc ac))) 0))))
+	(> (string-length (rk-pending (anthy-context-rkc ac))) 0))))
 
 (define anthy-proc-transposing-state
   (lambda (ac key key-state)