bug#74915: [PATCH] Fix custom types of gnus-article-treat-head-custom variables

[Björn Bidar]

Robert Pluim <rpluim@gmail.com> writes:

>>>>>> On Tue, 17 Dec 2024 00:30:04 +0200, Björn Bidar <bjorn.bidar@thaodan.de> 
>>>>>> said:
>
>     Björn> Robert Pluim <rpluim@gmail.com> writes:
>     >>>>>>> On Mon, 16 Dec 2024 19:33:31 +0200, Björn Bidar via "Bug
>     >> reports for GNU Emacs, the Swiss army knife of text editors"
>     >> <bug-gnu-emacs@gnu.org> said:
>     Björn> From 2b365a8804afab600437aa9e8dba3c45ac4363fe Mon Sep 17 00:00:00 
> 2001
>     Björn> From: =?UTF-8?q?Bj=C3=B6rn=20Bidar?= <bjorn.bidar@thaodan.de>
>     Björn> Date: Mon, 16 Dec 2024 19:20:00 +0200
>     Björn> Subject: [PATCH] Fix custom types of 
> gnus-article-treat-head-custom variables
>     >> 
>     Björn> lisp/gnus/gnus-art.el (gnus-treat-buttonize-head, gnus-treat-date)
>     Björn> (gnus-treat-hide-headers, gnus-treat-hide-boring-headers)
>     Björn> (gnus-treat-highlight-headers, gnus-treat-display-x-face)
>     Björn> (gnus-treat-display-face, gnus-treat-display-face)
>     Björn> (gnus-treat-mail-picon, gnus-treat-newsgroups-picon)
>     Björn> (gnus-treat-from-gravatar, gnus-treat-mail-gravatar)
>     Björn> (gnus-treat-body-boundary): Fix custom types to
>     Björn> include all possible choices mentioned in the docstrings
>     Björn> and manual.
>     >> 
>     >> The commit message only needs to mention the type you actually
>     >> changed, in this case `gnus-article-treat-head-custom'
>
>     Björn> The type meaning the custom type or the variable?
>
> The variable. All the other things you mention use the variable, but
> there is no code change for them.

ok.

>
>     Björn> ---
>     Björn> lisp/gnus/gnus-art.el | 5 ++++-
>     Björn> 1 file changed, 4 insertions(+), 1 deletion(-)
>     >> 
>     Björn> diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
>     Björn> index 8243e4e632b..13dfb737243 100644
>     Björn> --- a/lisp/gnus/gnus-art.el
>     Björn> +++ b/lisp/gnus/gnus-art.el
>     Björn> @@ -1113,7 +1113,10 @@ gnus-article-treat-custom
>     >> 
>     Björn> (defvar gnus-article-treat-head-custom
>     Björn> '(choice (const :tag "Off" nil)
>     Björn> -     (const :tag "Header" head)))
>     Björn> +     (const :tag "Header" head)
>     Björn> +           (const :tag "First" first)
>     Björn> +           (const :tag "Last" last)
>     Björn> +           (boolean :tag "All body parts" t)))
>     >> 
>     >> `t' is a const, not a boolean, the same as `nil', in the context of
>     >> defcustom.
>
>     Björn> There's bolean in the context of custom but I the context of 
> choice is
>     Björn> should be const with nil or t.
>
> `nil' is already in the list.
>
>     >> Plus a lot of the docstrings look cut&paste, so Iʼm not
>     >> entirely sure that itʼs the existing type that is wrong rather than
>     >> the docstring.
>
>     Björn> The manual, in (info "(gnus) Customizing Articles") , seem to 
> match with
>     Björn> those and talk in general like they apply to all of these. 
>
> I really donʼt think something like this
>
>   6. An integer: Do this treatment on all body parts that have a length
>      less than this number.
>
> is applicable to headers.

Ok sure. What do you suggest instead?