From f26cab021cabed12ae9933644e3f35f4adbe8069 Mon Sep 17 00:00:00 2001 From: tomo Date: Tue, 29 Jun 2004 15:19:41 +0000 Subject: [PATCH] (insert-char-attributes): Don't display `->ancient' when running with non-readable mode and it does not have `->ancient*sources'. --- lisp/utf-2000/char-db-util.el | 1 + 1 file changed, 1 insertion(+) diff --git a/lisp/utf-2000/char-db-util.el b/lisp/utf-2000/char-db-util.el index d0e521a..b87dea3 100644 --- a/lisp/utf-2000/char-db-util.el +++ b/lisp/utf-2000/char-db-util.el @@ -953,6 +953,7 @@ (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) -- 1.7.10.4