(modify-category-entry (decode-char 'ucs (+ i #xf00)) ?q))
(let ((deflist '(;; chars syntax category
- ("\e4\e$(7"!\e0"!\e1\e(B-\e4\e$(7"J\e0"J\e1\e4"K\e0"K\e1\e(B" "w" ?0) ; consonant
+ ("\e4\e$(7"!\e(B\e0\e$(7"!\e(B\e1-\e4\e$(7"J\e(B\e0\e$(7"J\e(B\e1\e4\e$(7"K\e(B\e0\e$(7"K\e(B\e1" "w" ?0) ; consonant
("\e$(7#!\e(B-\e$(7#J#K#L#M!"!#\e(B" "w" ?0) ;
("\e$(7$!\e(B-\e$(7$e\e(B" "w" ?0) ;
("\e$(7%!\e(B-\e$(7%u\e(B" "w" ?0) ;
(setq utf-translate-cjk-mode saved-utf-translate-cjk-mode)
(makunbound 'saved-utf-translate-cjk-mode)
-;;; Local Variables:
-;;; coding: iso-2022-7bit
-;;; End:
+;; Local Variables:
+;; coding: iso-2022-7bit
+;; End:
-;;; arch-tag: 85889c35-9f4d-4912-9bf5-82de31b0d42d
+;; arch-tag: 85889c35-9f4d-4912-9bf5-82de31b0d42d
;;; characters.el ends here