# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1205355695 0
# Node ID ca94bdbd0b627c7e3e37b6cf20c0e7868c9fb3c4
# Parent  a7f3b0c8e4a5674cb779f6ad401fc5f2fc5606ad
(quail-help): Use set-buffer-multibyte rather than
setting default-enable-multibyte-characters.

diff -r a7f3b0c8e4a5 -r ca94bdbd0b62 lisp/ChangeLog
--- 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):
diff -r a7f3b0c8e4a5 -r ca94bdbd0b62 lisp/international/quail.el
--- 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.