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.

diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index 0f5d253bc96f8ce207bd6ff185a7a101e436e5ca..9e60c21e3d4381e9931ff4cb54921d05d66c8c7b 100644 (file)
--- 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)