(quail-help): Don't call help-setup-xref.

diff --git a/lisp/international/quail.el b/lisp/international/quail.el
index 0c301111dac7f5add89e233acf8470824a45dd77..dcadfa7a3b8f57434f5d04705acd91c59a8f8fb4 100644 (file)
--- a/lisp/international/quail.el
+++ b/lisp/international/quail.el
@@ -2416,10 +2416,10 @@ package to describe."
             (assoc package quail-package-alist)
           quail-current-package)))
     ;; At first, make sure that the help buffer has window.
-    (help-setup-xref (list #'quail-help package) (interactive-p))
-    (with-output-to-temp-buffer (help-buffer)
-      (with-current-buffer standard-output
-       (setq quail-current-package package-def)))
+    (let ((temp-buffer-show-hook nil))
+      (with-output-to-temp-buffer (help-buffer)
+       (with-current-buffer standard-output
+         (setq quail-current-package package-def))))
     ;; Then, insert text in the help buffer while paying attention to
     ;; the width of the frame in which the buffer displayed.
     (with-current-buffer (help-buffer)