changeset 90275:50eb9e2ff05f

(describe-char): Fix for sync with HEAD.
author Kenichi Handa <handa@m17n.org>
date Fri, 20 Jan 2006 02:03:51 +0000
parents b2784209ad3c
children 8c61f33e006f
files lisp/descr-text.el
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/descr-text.el	Thu Jan 19 07:42:21 2006 +0000
+++ b/lisp/descr-text.el	Fri Jan 20 02:03:51 2006 +0000
@@ -506,8 +506,7 @@
 				     `(insert-text-button
 				       ,(symbol-name face)
 				       'type 'help-face 'help-args '(,face))))))
-	    ,@(let ((unicodedata (and unicode
-				      (describe-char-unicode-data unicode))))
+	    ,@(let ((unicodedata (describe-char-unicode-data char)))
 		(if unicodedata
 		    (cons (list "Unicode data" " ") unicodedata)))))
     (setq max-width (apply #'max (mapcar #'(lambda (x)