Re: master 13bd79e34f: Add more headers to default value of rmail-retry-ignored-headers.

[Po Lu]

"Richard M. Stallman" <rms@gnu.org> writes:

> branch: master
> commit 13bd79e34fc6085410057f669cea435f2d1d046a
> Author: Richard Stallman <rms@gnu.org>
> Commit: Richard Stallman <rms@gnu.org>
>
>     Add more headers to default value of rmail-retry-ignored-headers.
>     
>     * rmail.el (rmail-retry-ignored-headers): Add more headers to default.
>     Don't bother with `purecopy'.  Split value readably.
> ---
>  lisp/mail/rmail.el | 10 ++++++++--
>  1 file changed, 8 insertions(+), 2 deletions(-)
>
> diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
> index fed0a2057b..9cc097d28d 100644
> --- a/lisp/mail/rmail.el
> +++ b/lisp/mail/rmail.el
> @@ -372,11 +372,17 @@ If nil, display all header fields except those matched 
> by
>    :group 'rmail-headers)
>  
>  ;;;###autoload
> -(defcustom rmail-retry-ignored-headers (purecopy 
> "^x-authentication-warning:\\|^x-detected-operating-system:\\|^x-spam[-a-z]*:\\|content-type:\\|content-transfer-encoding:\\|mime-version:\\|message-id:")
> +(defcustom rmail-retry-ignored-headers
> +  (concat "^x-authentication-warning:\\|^x-detected-operating-system:\\|"
> +          "^x-spam[-a-z]*:\\|^arc-.*:\\|"
> +          "^content-type:\\|^content-transfer-encoding:\\|"
> +          "^mime-version:\\|^message-id:\\|^x-google-smtp-source:\\|"
> +          "^x-received:\\|^received-spf:\\|"
> +          "^authentication-results:\\|^dkim-signature:")
>    "Headers that should be stripped when retrying a failed message."
>    :type '(choice regexp (const :value nil :tag "None"))
>    :group 'rmail-headers
> -  :version "23.2")      ; added x-detected-operating-system, x-spam
> +  :version "23.2")

Since the default was changed, :version must be updated too, right?