From 8f75cca7b6c19f3648891993007cf1885ba0e9dd Mon Sep 17 00:00:00 2001 From: tomo Date: Sat, 29 Oct 2011 23:34:56 +0000 Subject: [PATCH] (char-db-insert-ccs-feature): Add setting for `=+>adobe-japan1'; don't use `string-match' for `=adobe-japan1-{0..6}'. --- lisp/utf-2000/char-db-util.el | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/lisp/utf-2000/char-db-util.el b/lisp/utf-2000/char-db-util.el index daf110c..874722d 100644 --- a/lisp/utf-2000/char-db-util.el +++ b/lisp/utf-2000/char-db-util.el @@ -487,10 +487,13 @@ =daikanwa/+p =daikanwa/+2p =gt =>>>gt =>>gt =+>gt =>gt =gt-k =>>gt-k =>gt-k - =>>adobe-japan1 + =adobe-japan1-0 =adobe-japan1-1 =adobe-japan1-2 + =adobe-japan1-3 =adobe-japan1-4 =adobe-japan1-5 + =adobe-japan1-6 =>>adobe-japan1 =+>adobe-japan1 =cbeta =>>cbeta =zinbun-oracle =>zinbun-oracle)) - (string-match "^=adobe-" (symbol-name name))) + ;; (string-match "^=adobe-" (symbol-name name)) + ) "(%-18s . %05d)\t; %c") ((memq name '(=hanyo-denshi/ks =>>hanyo-denshi/ks mojikyo)) "(%-18s . %06d)\t; %c") -- 1.7.10.4