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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 19ea787..844fcaa 100644 (file)
--- 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 328a5d5..2e6f06a 100644 (file)
--- 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