(require 'its))
(define-its-state-machine its-zenkaku-up-map
- "zenkaku-upcase" "\e$B#A\e(B" 'Japanese
+ "zenkaku-upcase" "\e$B#A\e(B" Japanese
"Map for zenkaku-upcase input."
(dolist (ascii '(("0" . "\e$B#0\e(B") ("1" . "\e$B#1\e(B") ("2" . "\e$B#2\e(B") ("3" . "\e$B#3\e(B")
(its-defrule in out))))
(define-its-state-machine its-zenkaku-down-map
- "zenkaku-downcase" "\e$B#a\e(B" 'Japanese
+ "zenkaku-downcase" "\e$B#a\e(B" Japanese
"Map for zenkaku-downcase input."
(dolist (ascii '(("0" . "\e$B#0\e(B") ("1" . "\e$B#1\e(B") ("2" . "\e$B#2\e(B") ("3" . "\e$B#3\e(B")