Mercurial > emacs
changeset 8493:2bf3f2e9f107
(appt-check): Update on first wakeup after midnight
even if that's not precisely 12:01.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 09 Aug 1994 05:42:35 +0000 |
| parents | 865daa7a9faf |
| children | ae554ccf4fb5 |
| files | lisp/calendar/appt.el |
| diffstat | 1 files changed, 4 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calendar/appt.el Tue Aug 09 04:29:53 1994 +0000 +++ b/lisp/calendar/appt.el Tue Aug 09 05:42:35 1994 +0000 @@ -246,10 +246,11 @@ (substring (current-time-string) 14 16))) (cur-comp-time (+ (* cur-hour 60) cur-min))) - ;; If the time is 12:01am, we should update our - ;; appointments to todays list. + ;; At the first check after 12:01am, we should update our + ;; appointments to today's list. - (if (= cur-comp-time 1) + (if (and (>= cur-comp-time 1) + (<= cur-comp-time appt-display-interval)) (if (and view-diary-entries-initially appt-display-diary) (diary) (let ((diary-display-hook 'appt-make-list))