From fc8ace6066ca0b3139855a16efc5f62245e23f84 Mon Sep 17 00:00:00 2001 From: tomo Date: Thu, 4 Aug 2005 10:37:15 +0000 Subject: [PATCH] (insert-char-attributes): Don't display `->font' when running with non-readable mode. --- 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 a5ac6e8..011af20 100644 --- a/lisp/utf-2000/char-db-util.el +++ b/lisp/utf-2000/char-db-util.el @@ -1014,6 +1014,7 @@ (eq name '->superscript) (eq name '->subscript) (eq name '->circled) + (string-match "^->font" (symbol-name name)) (string-match "^->compat" (symbol-name name)) (string-match "^->halfwidth" (symbol-name name)) (and -- 1.7.10.4