Mercurial > emacs
changeset 34764:14e6e9496603
(describe-char-after): Make *Help*
buffer inherit multibyteness of the current buffer.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Thu, 21 Dec 2000 01:57:24 +0000 |
| parents | c5c48f98f3f2 |
| children | bb3103d4e94d |
| files | lisp/international/mule-diag.el |
| diffstat | 1 files changed, 2 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/mule-diag.el Thu Dec 21 01:57:04 2000 +0000 +++ b/lisp/international/mule-diag.el Thu Dec 21 01:57:24 2000 +0000 @@ -525,6 +525,7 @@ (composition (find-composition (point) nil nil t)) (composed (if composition (buffer-substring (car composition) (nth 1 composition)))) + (multibyte-p enable-multibyte-characters) item-list max-width) (if (eq charset 'unknown) (setq item-list @@ -582,6 +583,7 @@ (with-output-to-temp-buffer "*Help*" (save-excursion (set-buffer standard-output) + (set-buffer-multibyte multibyte-p) (let ((formatter (format "%%%ds:" max-width))) (dolist (elt item-list) (insert (format formatter (car elt)))