From 180505d55e3486320b9137534b2e4c3280c70d8a Mon Sep 17 00:00:00 2001
From: Kenichi Handa <handa@m17n.org>
Date: Fri, 20 Jan 2006 02:03:51 +0000
Subject: [PATCH] (describe-char): Fix for sync with HEAD.

---
 lisp/descr-text.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lisp/descr-text.el b/lisp/descr-text.el
index 8a32f6202c5..599ee7ffeb3 100644
--- a/lisp/descr-text.el
+++ b/lisp/descr-text.el
@@ -506,8 +506,7 @@ as well as widgets, buttons, overlays, and text properties."
 				     `(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)