changeset 102355:5d529b1750d2

(rmail-dont-reply-to-names, rmail-default-dont-reply-to-names): Doc fixes. (rmail-reply): Avoid extraneous leading whitespace.
author Glenn Morris <rgm@gnu.org>
date Mon, 02 Mar 2009 07:23:57 +0000
parents 3206ad427d3c
children fd6b5c8dd39b
files lisp/ChangeLog lisp/mail/rmail.el
diffstat 2 files changed, 20 insertions(+), 9 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Mon Mar 02 07:00:43 2009 +0000
+++ b/lisp/ChangeLog	Mon Mar 02 07:23:57 2009 +0000
@@ -5,6 +5,9 @@
 
 	* mail/rmail.el (rmail-reply): Use rmail-apply-in-message so that this
 	function has access to all the headers, not just the visible ones.
+	(rmail-dont-reply-to-names, rmail-default-dont-reply-to-names):
+	Doc fixes.
+	(rmail-reply): Avoid extraneous leading whitespace.
 
 2009-03-01  Chong Yidong  <cyd@stupidchicken.com>
 
--- a/lisp/mail/rmail.el	Mon Mar 02 07:00:43 2009 +0000
+++ b/lisp/mail/rmail.el	Mon Mar 02 07:23:57 2009 +0000
@@ -298,18 +298,24 @@
 ;;;###autoload
 (defcustom rmail-dont-reply-to-names nil
   "A regexp specifying addresses to prune from a reply message.
-A value of nil means exclude your own email address as an address
-plus whatever is specified by `rmail-default-dont-reply-to-names'."
+If this is nil, it is set the first time you compose a reply, to
+a value which excludes your own email address, plus whatever is
+specified by `rmail-default-dont-reply-to-names'.
+
+Matching addresses are excluded from the CC field in replies, and
+also the To field, unless this would leave an empty To field."
   :type '(choice regexp (const :tag "Your Name" nil))
   :group 'rmail-reply)
 
 ;;;###autoload
 (defvar rmail-default-dont-reply-to-names "\\`info-"
-  "A regular expression specifying part of the default value of the
-variable `rmail-dont-reply-to-names', for when the user does not set
-`rmail-dont-reply-to-names' explicitly.  (The other part of the default
-value is the user's email address and name.)
-It is useful to set this variable in the site customization file.")
+  "Regexp specifying part of the default value of `rmail-dont-reply-to-names'.
+This is used when the user does not set `rmail-dont-reply-to-names'
+explicitly.  (The other part of the default value is the user's
+email address and name.)  It is useful to set this variable in
+the site customization file.  The default value is conventionally
+used for large mailing lists to broadcast announcements.")
+;; Is it really useful to set this site-wide?
 
 ;;;###autoload
 (defcustom rmail-ignored-headers
@@ -3378,8 +3384,10 @@
 		   (aref rmail-msgref-vector msgnum))
 		 rmail-answered-attr-index))
      nil
-     (list (cons "References" (concat (mapconcat 'identity references " ")
-				      " " message-id))))))
+     (list (cons "References" (if references
+				  (concat (mapconcat 'identity references " ")
+					  " " message-id)
+				message-id))))))
 
 (defun rmail-mark-message (buffer msgnum-list attribute)
   "Give BUFFER's message number in MSGNUM-LIST the attribute ATTRIBUTE.