X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2Fchar-db-util.el;h=b87dea3cd98558648cd5d60fedb97bb628bb9d96;hb=c9accada674f5c86865718db1d667fc8ffecb290;hp=93cbb202f31a1ef709f4cca6ac9aaae3b660c2e4;hpb=61f7c45ceb936ed0d4c21960ae6c324fed21421d;p=chise%2Fxemacs-chise.git.1

diff --git a/lisp/utf-2000/char-db-util.el b/lisp/utf-2000/char-db-util.el
index 93cbb20..b87dea3 100644
--- a/lisp/utf-2000/char-db-util.el
+++ b/lisp/utf-2000/char-db-util.el
@@ -952,6 +952,8 @@
 			  (string-match "^<-same" (symbol-name name))
 			  (string-match "^->vulgar" (symbol-name name))
 			  (string-match "^->wrong" (symbol-name name))
+			  (string-match "^->original" (symbol-name name))
+			  (string-match "^->ancient" (symbol-name name))
 			  ))
 		 )
 		((or (eq name 'ideographic-structure)