aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman1994-01-03 05:14:06 +0000
committerRichard M. Stallman1994-01-03 05:14:06 +0000
commit151c7da2547e48e0400313d7205494193be849d6 (patch)
tree05f58580b311d959e38bce1572de2a67388f1560 /lisp
parent4138e6000892b340c12629465060c587058c000d (diff)
downloademacs-151c7da2547e48e0400313d7205494193be849d6.tar.gz
emacs-151c7da2547e48e0400313d7205494193be849d6.zip
(rmail-get-new-mail): Cope if display-time-string is nil.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/mail/rmail.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 3aa0391eef0..fcda6eb0ec5 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -720,6 +720,7 @@ argument causes us to read a file name and use that file as the inbox."
720 (message "%d new message%s read" 720 (message "%d new message%s read"
721 new-messages (if (= 1 new-messages) "" "s")) 721 new-messages (if (= 1 new-messages) "" "s"))
722 (and (boundp 'display-time-string) 722 (and (boundp 'display-time-string)
723 (stringp display-time-string)
723 (string-match " Mail" display-time-string) 724 (string-match " Mail" display-time-string)
724 (setq display-time-string 725 (setq display-time-string
725 (concat 726 (concat