emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 0b4eec3: Check gnus-mailing-list-groups in turn-on-gnus-mailing-l


From: Filipp Gunbin
Subject: master 0b4eec3: Check gnus-mailing-list-groups in turn-on-gnus-mailing-list-mode
Date: Fri, 22 Nov 2019 12:53:02 -0500 (EST)

branch: master
commit 0b4eec3169690dab5ffa5027770893fff87f505f
Author: Filipp Gunbin <address@hidden>
Commit: Filipp Gunbin <address@hidden>

    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 d68d077..ce04a15 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



reply via email to

[Prev in Thread] Current Thread [Next in Thread]