Fixed a bug in daily subtotals

diff --git a/tks.pl b/tks.pl
index b1169471a06226cd9a12003e6204b1bb783a9136..f15fc79e2b332ef82f722cfd2fc8581d28e51052 100755 (executable)
--- 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};