Revision: 7328
Author: deton.kih
Date: Sat Oct 15 23:36:40 2011
Log: * scm/tutcode.scm
- (tutcode-proc-state-bushu):
Fix to show bushu prediction only when rk sequence is not started.
http://code.google.com/p/uim/source/detail?r=7328
Modified:
/trunk/scm/tutcode.scm
=======================================
--- /trunk/scm/tutcode.scm Sat Oct 15 16:47:59 2011
+++ /trunk/scm/tutcode.scm Sat Oct 15 23:36:40 2011
@@ -3586,7 +3586,8 @@
(if res
(tutcode-begin-bushu-conversion pc res)
(if (and tutcode-use-bushu-prediction?
- (pair? (tutcode-context-head pc)))
+ (pair? (tutcode-context-head pc))
+ (= (length (rk-context-seq rkc)) 0))
(let ((prevchar (car (tutcode-context-head pc))))
(if (not (string=? prevchar "¢¥"))
(tutcode-check-bushu-prediction pc prevchar)))))))
