(Man-notify-when-ready) <newframe>:

Mark frame's window as dedicated.
This commit is contained in:
Richard M. Stallman 1998-04-16 06:25:11 +00:00
parent 49bdcd3e96
commit 42a9dc8436

View file

@ -620,8 +620,9 @@ See the variable `Man-notify-method' for the different notification behaviors."
;; can't rely on the editor command loop to reselect the
;; selected window's buffer.
(save-excursion
(set-buffer man-buffer)
(make-frame Man-frame-parameters)))
(let ((frame (make-frame Man-frame-parameters)))
(set-window-buffer (frame-selected-window frame) man-buffer)
(set-window-dedicated-p (frame-selected-window frame) t))))
((eq Man-notify-method 'pushy)
(switch-to-buffer man-buffer))
((eq Man-notify-method 'bully)