From 3b774a0c201068fa0659b7d3fd3d6044ffde50e3 Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Thu, 10 May 2001 01:55:51 +0000 Subject: [PATCH] (timeclock-find-discrep): Set `timeclock-last-event-workday' if it's still nil. --- lisp/calendar/timeclock.el | 2 ++ 1 file changed, 2 insertions(+) diff --git a/lisp/calendar/timeclock.el b/lisp/calendar/timeclock.el index 53ff1277139..2cd06f3ac6b 100644 --- a/lisp/calendar/timeclock.el +++ b/lisp/calendar/timeclock.el @@ -1077,6 +1077,8 @@ See the documentation for the given function if more info is needed." timeclock-workday)) (forward-line)) (setq timeclock-discrepancy accum)))) + (unless timeclock-last-event-workday + (setq timeclock-last-event-workday timeclock-workday)) (setq accum timeclock-discrepancy elapsed timeclock-elapsed) (if timeclock-last-event -- 2.39.5