Restore `with-help-window' return code

* lisp/help.el (help--window-setup): Return the correct thing.
This commit is contained in:
Lars Ingebrigtsen 2022-05-14 04:13:44 +02:00
parent 5f7dd959c2
commit 334fa0c91d

View file

@ -1966,8 +1966,9 @@ The `temp-buffer-window-setup-hook' hook is called."
(delete-all-overlays)
(prog1
(let ((standard-output (current-buffer)))
(funcall callback)
(run-hooks 'temp-buffer-window-setup-hook))
(prog1
(funcall callback)
(run-hooks 'temp-buffer-window-setup-hook)))
(help-window-setup (temp-buffer-window-show (current-buffer)))
(help-make-xrefs (current-buffer))))))