Mercurial > emacs

diff lisp/descr-text.el @ 90275:50eb9e2ff05f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(describe-char): Fix for sync with HEAD.
author Kenichi Handa <handa@m17n.org>
date Fri, 20 Jan 2006 02:03:51 +0000
parents 7beb78bc1f8e
children f12f7e75abbe
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)