From 9fa0334c27652ebd66cb7e60a3020efab45f7503 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Tue, 20 Jan 2004 22:52:11 +0000 Subject: [PATCH] (appt-check): Restore usage of appt-issue-message deleted in previous change. (top-level): Activate package when loaded (needed for backwards compatibility). --- lisp/calendar/appt.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/calendar/appt.el b/lisp/calendar/appt.el index 8a92ef614ce..f6e33aeefe0 100644 --- a/lisp/calendar/appt.el +++ b/lisp/calendar/appt.el @@ -341,7 +341,7 @@ displayed in a window: ;; 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 @@ ARG is positive, otherwise off." (appt-check t)))) +;; This is needed for backwards compatibility. Feh. +(appt-activate 1) + + (provide 'appt) ;;; arch-tag: bf5791c4-8921-499e-a26f-772b1788d347 -- 2.11.4.GIT