(timeclock-find-discrep): Set `timeclock-last-event-workday' if it's

still nil.

1 files changed, 2 insertions, 0 deletions

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