* lisp/mail/mail-utils.el (mail-dont-reply-to): Silence compiler.

2 files changed, 3 insertions, 1 deletions

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