aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJohn Wiegley2001-05-10 02:46:38 +0000
committerJohn Wiegley2001-05-10 02:46:38 +0000
commit8c9245e2a54cd48a693adfbd3a2b34f2168c4e45 (patch)
tree68ffb24729545a54f2b2a7c9fd497879d8cdc4ee
parentcb89da0f8fab4ef2cb732a72013e0b964f9d15c5 (diff)
downloademacs-8c9245e2a54cd48a693adfbd3a2b34f2168c4e45.tar.gz
emacs-8c9245e2a54cd48a693adfbd3a2b34f2168c4e45.zip
One more variable coming up nil on the first time around, needing
guarding.
-rw-r--r--lisp/calendar/timeclock.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calendar/timeclock.el b/lisp/calendar/timeclock.el
index a054513441c..e570f9bf2f7 100644
--- a/lisp/calendar/timeclock.el
+++ b/lisp/calendar/timeclock.el
@@ -1080,7 +1080,7 @@ See the documentation for the given function if more info is needed."
1080 (unless timeclock-last-event-workday 1080 (unless timeclock-last-event-workday
1081 (setq timeclock-last-event-workday timeclock-workday)) 1081 (setq timeclock-last-event-workday timeclock-workday))
1082 (setq accum timeclock-discrepancy 1082 (setq accum timeclock-discrepancy
1083 elapsed timeclock-elapsed) 1083 elapsed (or timeclock-elapsed elapsed))
1084 (if timeclock-last-event 1084 (if timeclock-last-event
1085 (if (equal (car timeclock-last-event) "i") 1085 (if (equal (car timeclock-last-event) "i")
1086 (let ((last-period (timeclock-last-period now))) 1086 (let ((last-period (timeclock-last-period now)))