Commit 1ce2659d authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

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

parent f80e2142
......@@ -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)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment