Mercurial > emacs
changeset 92754:6984a176570c
(message-ignored-resent-headers): Add "Delivered-To".
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Wed, 12 Mar 2008 13:06:58 +0000 |
| parents | 3bef33921e01 |
| children | 0ff1aa5b228e |
| files | lisp/gnus/ChangeLog lisp/gnus/message.el |
| diffstat | 2 files changed, 14 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog Wed Mar 12 12:05:30 2008 +0000 +++ b/lisp/gnus/ChangeLog Wed Mar 12 13:06:58 2008 +0000 @@ -1,7 +1,11 @@ +2008-03-12 Stefan Monnier <monnier@iro.umontreal.ca> + + * message.el (message-ignored-resent-headers): Add "Delivered-To". + 2008-03-08 Reiner Steib <Reiner.Steib@gmx.de> - * mail-source.el (mail-source-delete-old-incoming-confirm): Change - default to nil. + * mail-source.el (mail-source-delete-old-incoming-confirm): + Change default to nil. (mail-source-delete-old-incoming): Make confirmation prompt more clear. 2008-03-07 Katsumi Yamaoka <yamaoka@jpl.org> @@ -31,7 +35,7 @@ * gnus-registry.el (gnus-registry-install): Allow 'ask as an option. (gnus-registry-initialize, gnus-registry-install-p): Use it. - (gnus-registry-install-shortcuts): Renamed from + (gnus-registry-install-shortcuts): Rename from gnus-registry-install-shortcuts-and-menus. Installs the shortcuts in the `gnus-registry-mark-map' keymap dynamically from `gnus-registry-marks'. The generated functions update the summary line
--- a/lisp/gnus/message.el Wed Mar 12 12:05:30 2008 +0000 +++ b/lisp/gnus/message.el Wed Mar 12 13:06:58 2008 +0000 @@ -561,7 +561,13 @@ :link '(custom-manual "(message)Forwarding") :type 'boolean) -(defcustom message-ignored-resent-headers "^Return-receipt\\|^X-Gnus\\|^Gnus-Warning:\\|^>?From " +(defcustom message-ignored-resent-headers + ;; `Delivered-To' needs to be removed because some mailers use it to + ;; detect loops, so if you resend a message to an address that ultimately + ;; comes back to you (e.g. a mailing-list to which you subscribe, in which + ;; case you may be removed from the list on the grounds that mail to you + ;; bounced with a "mailing loop" error). + "^Return-receipt\\|^X-Gnus\\|^Gnus-Warning:\\|^>?From \\|^Delivered-To:" "*All headers that match this regexp will be deleted when resending a message." :group 'message-interface :link '(custom-manual "(message)Resending")