From b5e990b44fe803ab184eed16790cc08afde91029 Mon Sep 17 00:00:00 2001
From: Martyn Smith <martyn@catalyst.net.nz>
Date: Thu, 29 May 2008 14:08:28 +1200
Subject: [PATCH] Fixed a bug in daily subtotals

---
 tks.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tks.pl b/tks.pl
index b116947..f15fc79 100755
--- a/tks.pl
+++ b/tks.pl
@@ -68,7 +68,7 @@ foreach my $entry ( @data ) {
     if ( $current_date and $current_date ne $entry->{date} ) {
         # time to print a summary
         printf("\t\t%.2f\n\n", $current_date_hoursum);
-        $current_date_hoursum = 0.0;
+        $current_date_hoursum = $entry->{time};
     }
     else {
         $current_date_hoursum += $entry->{time};
-- 
2.39.5