Mercurial > emacs

changeset 53643:761988ba350d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(appt-check): Restore usage of appt-issue-message deleted in previous change. (top-level): Activate package when loaded (needed for backwards compatibility).
author Glenn Morris <rgm@gnu.org>
date Tue, 20 Jan 2004 22:52:11 +0000
parents 4464cbe0f701
children 5d6e643eb334
files lisp/calendar/appt.el
diffstat 1 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calendar/appt.el	Tue Jan 20 22:51:38 2004 +0000
+++ b/lisp/calendar/appt.el	Tue Jan 20 22:52:11 2004 +0000
@@ -341,7 +341,7 @@
 	  ;; get the first time off of the list
 	  ;; and calculate the number of minutes until the appointment.
 
-	  (if appt-time-msg-list
+	  (if (and appt-issue-message appt-time-msg-list)
 	      (let ((appt-comp-time (car (car (car appt-time-msg-list)))))
 		(setq min-to-app (- appt-comp-time cur-comp-time))
 
@@ -659,6 +659,10 @@
       (appt-check t))))
 
 
+;; This is needed for backwards compatibility. Feh.
+(appt-activate 1)
+
+
 (provide 'appt)
 
 ;;; arch-tag: bf5791c4-8921-499e-a26f-772b1788d347