* message.el (message-completion-alist): Add Reply-To, From, etc.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index dbe93ae..99418b5 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2002-09-18  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+       * message.el (message-completion-alist): Add Reply-To, From, etc.
+
 2002-09-18  Simon Josefsson  <jas@extundo.com>
 
        * nnimap.el (nnimap-request-expire-articles): Make flag setting
@@ -7652,7 +7656,7 @@
        * gnus-sum.el (gnus-summary-mark-article-as-replied): Make into a
        command.
 
-2001-03-31 01:04:54  Francis Litterio  <franl@world.omitthis.std.com>
+2001-03-31 01:04:54  Francis Litterio  <franl@world.std.com>
 
        * message.el (message-set-auto-save-file-name): Don't use
        asterisks under nt.

diff --git a/lisp/message.el b/lisp/message.el
index d977f56..71ec801 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -5879,7 +5879,9 @@ which specify the range to operate on."
 
 (defcustom message-completion-alist
   (list (cons message-newgroups-header-regexp 'message-expand-group)
-       '("^\\(Resent-\\)?\\(To\\|B?Cc\\):" . message-expand-name))
+       '("^\\(Resent-\\)?\\(To\\|B?Cc\\):" . message-expand-name)
+       '("^\\(Reply-To\\|From\\|Disposition-Notification-To\\|Return-Receipt-To\\):" 
+         . message-expand-name))
   "Alist of (RE . FUN).  Use FUN for completion on header lines matching RE."
   :group 'message
   :type '(alist :key-type regexp :value-type function))