mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-24 07:20:37 +00:00
Code Issues Releases Activity

One more variable coming up nil on the first time around, needing

Browse Source 
guarding.
This commit is contained in:
John Wiegley 2001-05-10 02:46:38 +00:00
parent cb89da0f8f
commit 8c9245e2a5
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/calendar/timeclock.el
View File

@ -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)))