(print-help-return-message): When

[gnu-emacs] / lisp / help.el

diff --git a/lisp/help.el b/lisp/help.el
index 2950ffd59299bbbdd81bf588b53fa92b6683fe67..67a8858473fd1659038318dbf67b22f363376341 100644 (file)
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -274,6 +274,10 @@ If FUNCTION is nil, applies `message' to it, thus printing it."
                     ;; Secondly, the buffer has not been displayed yet,
                     ;; so we don't know whether its frame will be selected.
                     nil)
+                   (display-buffer-reuse-frames
+                    (setq help-return-method (cons (selected-window)
+                                                   'quit-window))
+                    nil)
                    ((not (one-window-p t))
                     (setq help-return-method
                           (cons (selected-window) 'quit-window))