From e0fcbb593168118e313ced4a9357dc0971ef2573 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 30 May 1993 19:15:39 +0000 Subject: [PATCH] (Man-notify-when-ready): Correct previous change. --- lisp/man.el | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/lisp/man.el b/lisp/man.el index 03437445d9f..db6a973c41d 100644 --- a/lisp/man.el +++ b/lisp/man.el @@ -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 "")) ))