[uim-commit] r2147 - trunk/scm

[ekato at freedesktop.org]

Author: ekato
Date: 2005-11-14 21:23:26 -0800 (Mon, 14 Nov 2005)
New Revision: 2147

Modified:
   trunk/scm/skk.scm
Log:
* scm/skk.scm (skk-string-list-to-context-head) : Fix # character.


Modified: trunk/scm/skk.scm
===================================================================
--- trunk/scm/skk.scm	2005-11-14 21:03:05 UTC (rev 2146)
+++ trunk/scm/skk.scm	2005-11-15 05:23:26 UTC (rev 2147)
@@ -1735,7 +1735,10 @@
 		;; handle Setsubi-ji
 		(and
 		 (null? (cdr sl))
-		 (string=? ">" (car sl))))
+		 (string=? ">" (car sl)))
+		(and
+		 skk-use-numeric-conversion?
+		 (string=? "#" (car sl))))
 	       (list (car sl) (car sl) (car sl))
 	       (find-kana-list-from-rule ja-rk-rule-basic (car sl))))
 	  (skk-string-list-to-context-head sc (cdr sl)))