master 02f57d0e159: Add some headers to message-ignored-bounced-headers

[Eric Abrahamsen]

branch: master
commit 02f57d0e1596d569292a1edd6b6cbabb2992a95a
Author: Eric Abrahamsen <eric@ericabrahamsen.net>
Commit: Eric Abrahamsen <eric@ericabrahamsen.net>

    Add some headers to message-ignored-bounced-headers
    
    * lisp/gnus/message.el (message-ignored-bounced-headers): These are
    headers that a) are derived from the exact text of the message and
    thus are now invalid and b) either will be automatically regenerated
    when the message is sent or shouldn't be present on the message copy
    at all.
---
 lisp/gnus/message.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index 0f5d253bc96..9e60c21e3d4 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -154,7 +154,7 @@ If this variable is nil, no such courtesy message will be 
added."
   :type '(radio string (const nil)))
 
 (defcustom message-ignored-bounced-headers
-  "^\\(Received\\|Return-Path\\|Delivered-To\\):"
+  "^\\(Received\\|Return-Path\\|Delivered-To\\|DKIM-Signature\\|X-Hashcash\\):"
   "Regexp that matches headers to be removed in resent bounced mail."
   :group 'message-interface
   :type 'regexp)
@@ -9008,7 +9008,7 @@ to the E-mail."
           (message-goto-body)
           (dolist (body (cdr (assoc "body" args)))
            (insert body "\n")))
-      
+
       (setq need-body t))
     (if (assoc "subject" args)
        (message-goto-body)