From 0b4eec3169690dab5ffa5027770893fff87f505f Mon Sep 17 00:00:00 2001 From: Filipp Gunbin Date: Fri, 22 Nov 2019 20:49:02 +0300 Subject: [PATCH] Check gnus-mailing-list-groups in turn-on-gnus-mailing-list-mode * lisp/gnus/gnus-ml.el (turn-on-gnus-mailing-list-mode): Check also gnus-mailing-list-groups variable. --- lisp/gnus/gnus-ml.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/gnus/gnus-ml.el b/lisp/gnus/gnus-ml.el index d68d0771ad4..ce04a15d671 100644 --- a/lisp/gnus/gnus-ml.el +++ b/lisp/gnus/gnus-ml.el @@ -58,7 +58,9 @@ ;;;###autoload (defun turn-on-gnus-mailing-list-mode () - (when (gnus-group-find-parameter gnus-newsgroup-name 'to-list) + (when (or (gnus-group-find-parameter gnus-newsgroup-name 'to-list) + (and gnus-mailing-list-groups + (string-match gnus-mailing-list-groups gnus-newsgroup-name))) (gnus-mailing-list-mode 1))) ;;;###autoload -- 2.39.2