[Uim] new input method 'look'

[Iwata]

Hi,

"Etsushi Kato" <ek.kato at gmail.com> writes:

> Minor nit: please don't set more than one cursor atturibute in
> look-update-preedit.  It could confuse bridges how to deal it ;)

You are right. Is it correct?
And this patch includes shrinking dictionary size 2 bytes/word.

Cheers,


--- old-uim/scm/look.scm        Sat Mar 17 02:02:37 2007
+++ new-uim/scm/look.scm        Sat Mar 17 02:02:37 2007
@@ -289,11 +289,11 @@
                           (look-context-dict lc)))))))
   (if (< (length (look-context-prev lc)) look-prepered-words)
       (look-context-set-prev! lc (append (look-context-prev lc)
-                                         (list (look-context-left lc))))
+                                         (list (string->symbol (look-context-left lc)))))
       (if (= 0 look-prepered-words)
           #t
           (look-context-set-prev! lc (append (cdr (look-context-prev lc))
-                                             (list (look-context-left lc)))))))
+                                             (list (string->symbol (look-context-left lc))))))))

 (define (look-search-learned lc str)
   (if (= 0 look-prepered-words)
@@ -445,7 +445,7 @@
    (look-format-candidates lc))
   (if (< (look-context-nth lc) (look-context-dictlen lc))
       (im-pushback-preedit
-       lc preedit-cursor
+       lc preedit-none
        (look-format-candidates-nth lc))
       (im-pushback-preedit
        lc preedit-reverse