rmail-dont-reply-to-names may not be defined.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 232ee72..ba8b911 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2000-08-08 00:53:41  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+       * message.el (message-dont-reply-to-names):
+       rmail-dont-reply-to-names may not be defined.
+
 2000-08-07 09:37:01  ShengHuo ZHU  <zsh@cs.rochester.edu>
 
        * gnus-group.el (gnus-group-iterate): Uncompiled function should 

diff --git a/lisp/message.el b/lisp/message.el
index 81bd8f2..fca0edb 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -669,7 +669,8 @@ Valid valued are `unique' and `unsent'."
   :group 'message
   :type 'symbol)
 
-(defcustom message-dont-reply-to-names rmail-dont-reply-to-names
+(defcustom message-dont-reply-to-names 
+  (and (boundp 'rmail-dont-reply-to-names) rmail-dont-reply-to-names)
   "*A regexp specifying names to prune when doing wide replies.
 A value of nil means exclude your own name only."
   :group 'message