Revision: 678d870a141a
Author: Muneyuki Noguchi <[email protected]>
Date: Sat Mar 17 21:14:23 2012
Log: Make all tests pass by following changes in 5a636aee1248.
* test/test-im.scm
- Change length of value returned by retrieve-im
because delay-activating-hander was added.
- Add elements for test-im and test-im2
because delay-activating-hander was added.
* test/test-lazy-load.scm
- Add elements for py because delay-activating-hander was added.
http://code.google.com/p/uim/source/detail?r=678d870a141a
Modified:
/test/test-im.scm
/test/test-lazy-load.scm
=======================================
--- /test/test-im.scm Wed Jan 11 00:17:24 2012
+++ /test/test-im.scm Sat Mar 17 21:14:23 2012
@@ -170,7 +170,7 @@
(assert-equal 'test-im
(uim '(im-name (retrieve-im 'test-im))))
(assert-false (uim-bool '(im-module-name (retrieve-im 'test-im))))
- (assert-equal 21
+ (assert-equal 22
(uim '(length (retrieve-im 'test-im))))
(uim '(im-set-module-name! (retrieve-im 'test-im) "foo"))
(assert-equal "foo"
@@ -201,6 +201,7 @@
#f
#f
#f
+ #f
#f)
(uim '(retrieve-im 'test-im)))
;; subsequent registration that has different im-name will be
@@ -231,6 +232,7 @@
#f
#f
#f
+ #f
#f)
(uim '(retrieve-im 'test-im2))))
=======================================
--- /test/test-lazy-load.scm Wed Jan 11 00:17:24 2012
+++ /test/test-lazy-load.scm Sat Mar 17 21:14:23 2012
@@ -109,7 +109,8 @@
#f ;; focus-out-handler
#f ;; place-handler
#f ;; displace-handler
- "pyload")
+ "pyload"
+ #f) ;; delay-activating-handler
'(retrieve-im 'py))
(uim-eval '(im-set-init-handler! (retrieve-im 'py) init-handler))
