From 16908a3f0dfbaac0e580412b68056df60bd41e91 Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Fri, 13 Oct 2000 09:35:36 +0000 Subject: [PATCH] Bug fix for timeclock.el --- lisp/ChangeLog | 5 +++++ lisp/calendar/timeclock.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 641f727c45d..1c9bb5eef74 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2000-10-13 John Wiegley + + * calendar/timeclock.el (timeclock-find-discrep): A fix to same + faulty math, where holiday hours were being computing as seconds. + 2000-10-13 John Wiegley * desktop.el (desktop-buffer-modes-to-save): Added a global for diff --git a/lisp/calendar/timeclock.el b/lisp/calendar/timeclock.el index f8daa32a1a1..f82d93fef23 100644 --- a/lisp/calendar/timeclock.el +++ b/lisp/calendar/timeclock.el @@ -679,7 +679,7 @@ identical to what would be return if `timeclock-relative' were nil." (setq last-date-limited (timeclock-time-to-date (cadr event)) last-date-seconds - (string-to-number (nth 2 event)))) + (* (string-to-number (nth 2 event)) 3600))) ((equal (car event) "i") (when (and (nth 2 event) (> (length (nth 2 event)) 0)) -- 2.39.5