From: Karl Heuer <kwzh@gnu.org>
Date: Thu, 27 Aug 1998 15:17:51 +0000 (+0000)
Subject: (appt-check): Clear appt-mode-string if we don't put something in it.
X-Git-Tag: emacs-20.4~1825
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f2999a979e2af1ede5c2498bc624a4db2a0284bd;p=emacs.git

(appt-check): Clear appt-mode-string if we don't put something in it.
---

diff --git a/lisp/calendar/appt.el b/lisp/calendar/appt.el
index 0efac2ec34c..9368c1b4265 100644
--- a/lisp/calendar/appt.el
+++ b/lisp/calendar/appt.el
@@ -286,6 +286,8 @@ The following variables control the action of the notification:
 		  (let ((diary-display-hook 'appt-make-list))
 		    (diary))))
 
+	    (setq appt-mode-string nil)
+
 	    ;; If there are entries in the list, and the
 	    ;; user wants a message issued
 	    ;; get the first time off of the list