# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1012732381 0
# Node ID a202d9fb56ebbbcc42b299689d205d2759b600eb
# Parent  61ad8f29fefaaa6070f735882ec0d7bc4a4e09f8
(quail-help): Don't call help-setup-xref.

diff -r 61ad8f29fefa -r a202d9fb56eb lisp/international/quail.el
--- a/lisp/international/quail.el	Sun Feb 03 10:32:13 2002 +0000
+++ b/lisp/international/quail.el	Sun Feb 03 10:33:01 2002 +0000
@@ -2416,10 +2416,10 @@
 	     (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)