Author: jhyeon
Date: Thu Sep 27 04:23:03 2007
New Revision: 5017
Modified:
trunk/scm/anthy-utf8.scm
trunk/scm/anthy.scm
Log:
* scm/anthy.scm
* scm/anthy-utf8.scm
- (anthy-move-prediction-in-page): fixed a comparison using =
of compensated-pageidx (an integer) and #f
Modified: trunk/scm/anthy-utf8.scm
==============================================================================
--- trunk/scm/anthy-utf8.scm (original)
+++ trunk/scm/anthy-utf8.scm Thu Sep 27 04:23:03 2007
@@ -884,7 +884,7 @@
anthy-nr-candidate-max)))))
(if (and
compensated-idx
- (not (= compensated-pageidx selected-pageidx)))
+ (not (eqv? compensated-pageidx selected-pageidx)))
(begin
(anthy-utf8-context-set-prediction-index! ac compensated-idx)
(im-select-candidate ac compensated-idx)
Modified: trunk/scm/anthy.scm
==============================================================================
--- trunk/scm/anthy.scm (original)
+++ trunk/scm/anthy.scm Thu Sep 27 04:23:03 2007
@@ -879,7 +879,7 @@
anthy-nr-candidate-max)))))
(if (and
compensated-idx
- (not (= compensated-pageidx selected-pageidx)))
+ (not (eqv? compensated-pageidx selected-pageidx)))
(begin
(anthy-context-set-prediction-index! ac compensated-idx)
(im-select-candidate ac compensated-idx)
