From b86bbe7ac4669b4b0eb9d5d5ed9762962d1322a6 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Tue, 22 Jun 1999 12:22:06 +0000 Subject: [PATCH] (gnus-dont-select-after-jump-to-other-group): New user option. (gnus-summary-jump-to-other-group): Use it. --- lisp/gnus-sum.el | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el index 3037666..6b4a5a6 100644 --- a/lisp/gnus-sum.el +++ b/lisp/gnus-sum.el @@ -285,6 +285,14 @@ in some newsgroups, set the variable to nil in (function-item gnus-summary-first-unread-article) (function-item gnus-summary-best-unread-article))) +(defcustom gnus-dont-select-after-jump-to-other-group nil + "If non-nil, don't select the first unread article after entering the +other group by the command `gnus-summary-jump-to-other-group'. If nil, +it is depend on the value of `gnus-auto-select-first' whether to select +or not." + :group 'gnus-group-select + :type 'boolean) + (defcustom gnus-auto-select-next t "*If non-nil, offer to go to the next group from the end of the previous. If the value is t and the next newsgroup is empty, Gnus will exit @@ -2694,7 +2702,8 @@ If SHOW-ALL is non-nil, already read articles are also listed." (and gnus-newsgroup-name (string-equal gnus-newsgroup-name group))) (gnus-summary-exit) - (gnus-summary-read-group group show-all t))) + (gnus-summary-read-group group show-all + gnus-dont-select-after-jump-to-other-group))) (defun gnus-summary-read-group-1 (group show-all no-article kill-buffer no-display -- 1.7.10.4