summaryrefslogtreecommitdiff
path: root/lisp/gnus
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2020-09-19 21:16:35 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2020-09-19 21:16:42 +0200
commiteda48b6fed851a14e183c38b737c5bc3992862c4 (patch)
tree08a35c025c9e203e4169ca554594ec7a454750ba /lisp/gnus
parent091cb97a2a4abba2615a5035d2ce26a6ee06d245 (diff)
downloademacs-eda48b6fed851a14e183c38b737c5bc3992862c4.tar.gz
Add a new variable 'gnus-global-groups'
* doc/misc/gnus.texi (HTML): Document it. * lisp/gnus/gnus-art.el (gnus-global-groups): New variable. (gnus-block-private-groups): Use it.
Diffstat (limited to 'lisp/gnus')
-rw-r--r--lisp/gnus/gnus-art.el10
1 files changed, 9 insertions, 1 deletions
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index 13a85379970..4484b95075c 100644
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -534,6 +534,13 @@ that the symbol of the saver function, which is specified by
:group 'gnus-article-saving
:type 'regexp)
+(defcustom gnus-global-groups nil
+ "Groups that should be considered like \"news\" groups.
+This means that images will be automatically loaded, for instance."
+ :type '(repeat string)
+ :version "28.1"
+ :group 'gnus-article)
+
;; Note that "Rmail format" is mbox since Emacs 23, but Babyl before.
(defcustom gnus-default-article-saver 'gnus-summary-save-in-rmail
"A function to save articles in your favorite format.
@@ -7138,7 +7145,8 @@ If given a prefix, show the hidden text instead."
"Allows images in newsgroups to be shown, blocks images in all
other groups."
(if (or (gnus-news-group-p group)
- (gnus-member-of-valid 'global group))
+ (gnus-member-of-valid 'global group)
+ (member group gnus-global-groups))
;; Block nothing in news groups.
nil
;; Block everything anywhere else.