From d9f7da3ce524a9603c808f51e34af994602234d9 Mon Sep 17 00:00:00 2001 From: Mauro Aranda Date: Mon, 18 Sep 2023 09:19:04 -0300 Subject: [PATCH] Fix term-scroll-to-bottom-on-output :type (Bug#66071) * lisp/term.el (term-scroll-to-bottom-on-output): Add missing choices. Don't advertise the value all anymore. --- lisp/term.el | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/term.el b/lisp/term.el index b8466b21332..b2875e4a17f 100644 --- a/lisp/term.el +++ b/lisp/term.el @@ -486,7 +486,7 @@ term-char-mode-point-at-process-mark (defcustom term-scroll-to-bottom-on-output nil "Controls whether interpreter output causes window to scroll. -If nil, then do not scroll. If t or `all', scroll all windows showing buffer. +If nil, then do not scroll. If t, scroll all windows showing buffer. If `this', scroll only the selected window. If `others', scroll only those that are not the selected window. @@ -494,7 +494,12 @@ term-scroll-to-bottom-on-output See variable `term-scroll-show-maximum-output'. This variable is buffer-local." - :type 'boolean + :type '(choice (const :tag "Don't scroll" nil) + (const :tag "Scroll selected window only" this) + (const :tag "Scroll unselected windows" others) + ;; We also recognize `all', but we don't advertise it + ;; anymore. (Bug#66071) + (other :tag "Scroll all windows" t)) :group 'term) (defcustom term-scroll-snap-to-bottom t -- 2.34.1