1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

(Man-notify-when-ready): Don't call select-frame if no window system.

This commit is contained in:
Richard M. Stallman 1994-05-02 19:40:19 +00:00
parent f55e5c6be1
commit 69e610ac11

View file

@ -489,16 +489,19 @@ See the variable `Man-notify' for the different notification behaviors."
(set-buffer man-buffer)
(new-frame Man-frame-parameters)))
((eq Man-notify 'bully)
(and (frame-live-p Man-original-frame)
(and window-system
(frame-live-p Man-original-frame)
(select-frame Man-original-frame))
(pop-to-buffer man-buffer)
(delete-other-windows))
((eq Man-notify 'aggressive)
(and (frame-live-p Man-original-frame)
(and window-system
(frame-live-p Man-original-frame)
(select-frame Man-original-frame))
(pop-to-buffer man-buffer))
((eq Man-notify 'friendly)
(and (frame-live-p Man-original-frame)
(and window-system
(frame-live-p Man-original-frame)
(select-frame Man-original-frame))
(display-buffer man-buffer 'not-this-window))
((eq Man-notify 'polite)