(diary-mail-addr): Use bound-and-true-p.

7cd59c73 · Glenn Morris · 628c97b2 · 7cd59c73
Commit 7cd59c73 authored Apr 03, 2008 by Glenn Morris
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

lisp/calendar/diary-lib.el lisp/calendar/diary-lib.el +1 -1

No files found.
--- a/lisp/calendar/diary-lib.el
+++ b/lisp/calendar/diary-lib.el
@@ -210,7 +210,7 @@ with no recognizable time after those with times."
  :version "20.3")

 (defcustom diary-mail-addr
-  (if (boundp 'user-mail-address) user-mail-address "")
+  (or (bound-and-true-p user-mail-address) "")
  "Email address that `diary-mail-entries' will send email to."
  :group 'diary
  :type  'string