Mercurial > emacs
changeset 92785:ca94bdbd0b62
(quail-help): Use set-buffer-multibyte rather than
setting default-enable-multibyte-characters.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Wed, 12 Mar 2008 21:01:35 +0000 |
| parents | a7f3b0c8e4a5 |
| children | f85ca7d27ab2 |
| files | lisp/ChangeLog lisp/international/quail.el |
| diffstat | 2 files changed, 3 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Wed Mar 12 20:58:32 2008 +0000 +++ b/lisp/ChangeLog Wed Mar 12 21:01:35 2008 +0000 @@ -1,6 +1,6 @@ 2008-03-12 Stefan Monnier <monnier@iro.umontreal.ca> - * international/quail.el (quail-setup-completion-buf): + * international/quail.el (quail-setup-completion-buf, quail-help): * mail/binhex.el (binhex-decode-region-internal): * mail/uudecode.el (uudecode-decode-region-internal): * net/dns.el (dns-read-string-name, dns-read, dns-read-type, query-dns):
--- a/lisp/international/quail.el Wed Mar 12 20:58:32 2008 +0000 +++ b/lisp/international/quail.el Wed Mar 12 21:01:35 2008 +0000 @@ -2448,7 +2448,7 @@ (interactive) (quail-help-init) (let ((help-xref-mule-regexp help-xref-mule-regexp-template) - (default-enable-multibyte-characters enable-multibyte-characters) + (mb enable-multibyte-characters) (package-def (if package (assoc package quail-package-alist) @@ -2457,6 +2457,7 @@ (let ((temp-buffer-show-hook nil)) (with-output-to-temp-buffer (help-buffer) (with-current-buffer standard-output + (set-buffer-multibyte mb) (setq quail-current-package package-def)))) ;; Then, insert text in the help buffer while paying attention to ;; the width of the window in which the buffer displayed.