diff -x .svn -upr org/anthy-utf8.scm mod/anthy-utf8.scm --- org/anthy-utf8.scm 2020-08-08 11:04:51.000000000 +0900 +++ mod/anthy-utf8.scm 2020-11-26 23:00:03.956610000 +0900 @@ -750,7 +750,7 @@ (charcode->string key)) (if (symbol? key) (symbol->string key) - (charcode->string (ichar-downcase key))))) + (charcode->string key)))) (res (rk-push-key! rkc key-str))) (if res (begin @@ -1306,7 +1306,7 @@ (charcode->string key)) (if (symbol? key) (symbol->string key) - (charcode->string (ichar-downcase key))))) + (charcode->string key)))) (pend (rk-pending rkc)) (res (rk-push-key! rkc key-str))) (if (and res diff -x .svn -upr org/anthy.scm mod/anthy.scm --- org/anthy.scm 2020-08-08 11:04:51.000000000 +0900 +++ mod/anthy.scm 2020-11-26 23:00:42.793119000 +0900 @@ -747,7 +747,7 @@ (charcode->string key)) (if (symbol? key) (symbol->string key) - (charcode->string (ichar-downcase key))))) + (charcode->string key)))) (res (rk-push-key! rkc key-str))) (if res (begin @@ -1303,7 +1303,7 @@ (charcode->string key)) (if (symbol? key) (symbol->string key) - (charcode->string (ichar-downcase key))))) + (charcode->string key)))) (pend (rk-pending rkc)) (res (rk-push-key! rkc key-str))) (if (and res