Revision: 7302
Author: nogu.dev
Date: Sun Sep 11 15:18:12 2011
Log: * scm/japanese-custom.scm
- (ja-rk-rule-table->rule): Don't use string-to-list.
http://code.google.com/p/uim/source/detail?r=7302
Modified:
/trunk/scm/japanese-custom.scm
=======================================
--- /trunk/scm/japanese-custom.scm Sun Sep 11 08:01:45 2011
+++ /trunk/scm/japanese-custom.scm Sun Sep 11 15:18:12 2011
@@ -438,8 +438,8 @@
; ("yen" "" "¡ï") -> ("yen")
'("yen"))
; ("ka" "" "¤«") -> ("k" "a")
- (reverse
- (string-to-list input))))
+ (map string
+ (string->list input))))
(let ((next-input (cadr item)))
(or
(and
