From 1ce2659dbe1e56ce2b738e2946c4cea38d665d7f Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 3 Feb 2002 10:33:01 +0000 Subject: [PATCH] (quail-help): Don't call help-setup-xref. --- lisp/international/quail.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/international/quail.el b/lisp/international/quail.el index 0c301111dac..dcadfa7a3b8 100644 --- 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) -- 2.39.2