Commit 8fdae34a authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(make-help-screen): Don't call window-frame in a non-multi-frame Emacs.

parent 24c22852
......@@ -114,10 +114,11 @@ and then returns."
(progn
(setq config (current-window-configuration))
(switch-to-buffer-other-window "*Help*")
(if (not (eq (window-frame (selected-window))
prev-frame))
(setq new-frame (window-frame (selected-window))
config nil))
(and (fboundp 'make-frame)
(not (eq (window-frame (selected-window))
prev-frame))
(setq new-frame (window-frame (selected-window))
config nil))
(erase-buffer)
(insert help-screen)
(goto-char (point-min))
......
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