diff options
| author | John Wiegley <johnw@newartisans.com> | 2001-05-10 02:46:38 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2001-05-10 02:46:38 +0000 |
| commit | 8c9245e2a54cd48a693adfbd3a2b34f2168c4e45 (patch) | |
| tree | 68ffb24729545a54f2b2a7c9fd497879d8cdc4ee /lisp/calendar/timeclock.el | |
| parent | cb89da0f8fab4ef2cb732a72013e0b964f9d15c5 (diff) | |
| download | emacs-8c9245e2a54cd48a693adfbd3a2b34f2168c4e45.tar.gz emacs-8c9245e2a54cd48a693adfbd3a2b34f2168c4e45.tar.bz2 emacs-8c9245e2a54cd48a693adfbd3a2b34f2168c4e45.zip | |
One more variable coming up nil on the first time around, needing
guarding.
Diffstat (limited to 'lisp/calendar/timeclock.el')
| -rw-r--r-- | lisp/calendar/timeclock.el | 2 |
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." (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))) |