From 4150463ed4743ba6e78c29b0ed690ebf809c85de Mon Sep 17 00:00:00 2001 From: Augusto Stoffel Date: Thu, 25 Aug 2022 18:21:39 +0200 Subject: [PATCH] New option thrifty for Man-notify-method * lisp/man.el (Man-notify-when-ready): Accept new 'thrifty' notify method. (Man-notify-method): Explain what 'thrifty' does. --- lisp/man.el | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/man.el b/lisp/man.el index d66f63972a..7ba7bee417 100644 --- a/lisp/man.el +++ b/lisp/man.el @@ -168,13 +168,14 @@ Man-notify-method bully -- make the manpage the current buffer and only window (sf) aggressive -- make the manpage the current buffer in the other window (sf) friendly -- display manpage in the other window but don't make current (sf) +thrifty -- reuse an existing manpage window if possible (sf) polite -- don't display manpage, but prints message and beep when ready quiet -- like `polite', but don't beep meek -- make no indication that the manpage is ready Any other value of `Man-notify-method' is equivalent to `meek'." :type '(radio (const newframe) (const pushy) (const bully) - (const aggressive) (const friendly) + (const aggressive) (const friendly) (const thrifty) (const polite) (const quiet) (const meek)) :group 'man) @@ -1229,6 +1230,11 @@ Man-notify-when-ready (and (frame-live-p saved-frame) (select-frame saved-frame)) (display-buffer man-buffer 'not-this-window)) + ('thrifty + (and (frame-live-p saved-frame) + (select-frame saved-frame)) + (display-buffer man-buffer '(display-buffer-reuse-mode-window + (mode . Man-mode)))) ('polite (beep) (message "Manual buffer %s is ready" (buffer-name man-buffer))) -- 2.37.2