diff options
| author | Kenichi Handa | 2006-01-20 02:03:51 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2006-01-20 02:03:51 +0000 |
| commit | 180505d55e3486320b9137534b2e4c3280c70d8a (patch) | |
| tree | 45ad8e9dae6ca4a718e142e404f86dd135cccbf5 | |
| parent | 3a7d24544d36ea6a6a8f523381fcb9822da4f6d3 (diff) | |
| download | emacs-180505d55e3486320b9137534b2e4c3280c70d8a.tar.gz emacs-180505d55e3486320b9137534b2e4c3280c70d8a.zip | |
(describe-char): Fix for sync with HEAD.
| -rw-r--r-- | lisp/descr-text.el | 3 |
1 files changed, 1 insertions, 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." | |||
| 506 | `(insert-text-button | 506 | `(insert-text-button |
| 507 | ,(symbol-name face) | 507 | ,(symbol-name face) |
| 508 | 'type 'help-face 'help-args '(,face)))))) | 508 | 'type 'help-face 'help-args '(,face)))))) |
| 509 | ,@(let ((unicodedata (and unicode | 509 | ,@(let ((unicodedata (describe-char-unicode-data char))) |
| 510 | (describe-char-unicode-data unicode)))) | ||
| 511 | (if unicodedata | 510 | (if unicodedata |
| 512 | (cons (list "Unicode data" " ") unicodedata))))) | 511 | (cons (list "Unicode data" " ") unicodedata))))) |
| 513 | (setq max-width (apply #'max (mapcar #'(lambda (x) | 512 | (setq max-width (apply #'max (mapcar #'(lambda (x) |