diff lisp/rmail/rmail.el @ 138:6608ceec7cf8 r20-2b3

Import from CVS: tag r20-2b3
author cvs
date Mon, 13 Aug 2007 09:31:46 +0200
parents fe104dbd9147
children
line wrap: on
line diff
--- a/lisp/rmail/rmail.el	Mon Aug 13 09:31:13 2007 +0200
+++ b/lisp/rmail/rmail.el	Mon Aug 13 09:31:46 2007 +0200
@@ -842,6 +842,7 @@
 	  ;; #### BOGUS!  Run a hook here instead and let time.el do it.
 	  (and (boundp 'display-time-string)
 	       display-time-string
+	       (stringp display-time-string)
 	       (string-match " Mail" display-time-string)
 	       (setq display-time-string
 		     (concat