Author: yamakenz
Date: Thu Nov 22 03:04:02 2007
New Revision: 5050
Modified:
trunk/scm/latin.scm
Log:
* scm/latin.scm
- (latin-proc-composing-state): Fix eq? for integer with eqv?
Modified: trunk/scm/latin.scm
==============================================================================
--- trunk/scm/latin.scm (original)
+++ trunk/scm/latin.scm Thu Nov 22 03:04:02 2007
@@ -1652,7 +1652,7 @@
(not (or (dead-keys? key)
(eq? 'Multi_key key))))
(and
- (eq? 32 key) ; space
+ (eqv? 32 key) ; space
(not (string-find (rk-expect rkc) " "))))
(latin-commit lc)
(im-commit-raw lc)
