Restore `with-help-window' return code
* lisp/help.el (help--window-setup): Return the correct thing.
This commit is contained in:
parent
5f7dd959c2
commit
334fa0c91d
1 changed files with 3 additions and 2 deletions
|
@ -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))))))
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue