* message.el (message-header-synonyms): Add Original-To to the

[gnus] / lisp / message.el

diff --git a/lisp/message.el b/lisp/message.el
index d2c15cd..4212edb 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -2819,7 +2819,8 @@ prefix FORCE is given."
     (message-carefully-insert-headers headers)))
 
 (defcustom message-header-synonyms
-  '((To Cc Bcc))
+  '((To Cc Bcc)
+    (Original-To))
   "List of lists of header synonyms.
 E.g., if this list contains a member list with elements `Cc' and `To',
 then `message-carefully-insert-headers' will not insert a `To' header