diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 19ea787d4b8..844fcaad833 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2011-05-17  Glenn Morris  <rgm@gnu.org>
 
+	* mail/mail-utils.el (mail-dont-reply-to): Silence compiler.
+
 	* progmodes/idlw-shell.el (idlwave-shell-complete-filename):
 	Replace obsolete function.
 
diff --git a/lisp/mail/mail-utils.el b/lisp/mail/mail-utils.el
index 328a5d50d34..2e6f06a6758 100644
--- a/lisp/mail/mail-utils.el
+++ b/lisp/mail/mail-utils.el
@@ -236,7 +236,7 @@ comma-separated list, and return the pruned list."
       (setq mail-dont-reply-to-names
 	    (concat
 	     ;; `rmail-default-dont-reply-to-names' is obsolete.
-	     (if rmail-default-dont-reply-to-names
+	     (if (bound-and-true-p rmail-default-dont-reply-to-names)
 		 (concat rmail-default-dont-reply-to-names "\\|")
 	       "")
 	     (if (and user-mail-address