1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 12:21:25 -08:00

(Man-notify-when-ready): Correct previous change.

This commit is contained in:
Richard M. Stallman 1993-05-30 19:15:39 +00:00
parent 5ab57b9f0a
commit e0fcbb5931

View file

@ -445,21 +445,21 @@ Man-reuse-okay-p is non-nil."
(defun Man-notify-when-ready (man-buffer)
"Notify the user when MAN-BUFFER is ready.
See the variable Man-notify for the different notification behaviors."
See the variable `Man-notify' for the different notification behaviors."
(cond
((eq man-notify 'bully)
((eq Man-notify 'bully)
(pop-to-buffer man-buffer)
(delete-other-windows))
((eq man-notify 'aggressive)
((eq Man-notify 'aggressive)
(pop-to-buffer man-buffer))
((eq man-notify 'friendly)
((eq Man-notify 'friendly)
(display-buffer man-buffer 'not-this-window))
((eq man-notify 'polite)
((eq Man-notify 'polite)
(beep)
(message "Manual buffer %s is ready." (buffer-name man-buffer)))
((eq man-notify 'quiet)
((eq Man-notify 'quiet)
(message "Manual buffer %s is ready." (buffer-name man-buffer)))
((or (eq man-notify 'meek)
((or (eq Man-notify 'meek)
t)
(message ""))
))