changeset 37652:7fb1a7ce4a40

One more variable coming up nil on the first time around, needing guarding.
author John Wiegley <johnw@newartisans.com>
date Thu, 10 May 2001 02:46:38 +0000
parents db867aae3c66
children 2b50df29a117
files lisp/calendar/timeclock.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calendar/timeclock.el	Thu May 10 01:57:04 2001 +0000
+++ b/lisp/calendar/timeclock.el	Thu May 10 02:46:38 2001 +0000
@@ -1080,7 +1080,7 @@
     (unless timeclock-last-event-workday
       (setq timeclock-last-event-workday timeclock-workday))
     (setq accum timeclock-discrepancy
-	  elapsed timeclock-elapsed)
+	  elapsed (or timeclock-elapsed elapsed))
     (if timeclock-last-event
 	(if (equal (car timeclock-last-event) "i")
 	    (let ((last-period (timeclock-last-period now)))