1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-17 09:55:58 +00:00

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.
This commit is contained in:
Lars Ingebrigtsen 2020-09-19 21:16:35 +02:00
parent 091cb97a2a
commit eda48b6fed
3 changed files with 22 additions and 1 deletions

View File

@ -11979,6 +11979,11 @@ anything that isn't a newsgroup. This means that no external images
will be fetched as a result of reading mail, so that nobody can use
web bugs (and the like) to track whether you've read email.
@vindex gnus-global-groups
If you have specific private groups that you want to have treated as
if they were public groups, you can add the name of that group to the
@code{gnus-global-groups} list.
Also @pxref{Misc Article} for @code{gnus-inhibit-images}.
@item gnus-html-cache-directory

View File

@ -363,6 +363,14 @@ tags to be considered as well.
** Gnus
+++
*** New variable 'gnus-global-groups'.
Gnus handles private groups differently from public (i.e., NNTP-like)
groups. Most importantly, Gnus doesn't download external images from
mail-like groups. This can be overridden by putting group names in
'gnus-global-groups': Any group present in that list will be treated
like a public group.
+++
*** New scoring types for the Date header.
You can now score based on the relative age of an article with the new

View File

@ -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.