From 0bd866f966195d243b7bf567ad84bd6ff5ee0b8a Mon Sep 17 00:00:00 2001
From: Nigel McNie <nigel@catalyst.net.nz>
Date: Mon, 16 Jun 2008 21:19:21 +1200
Subject: [PATCH] Round entry times to 2dp, to prevent stupid entries in WRMS.

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

diff --git a/tks.pl b/tks.pl
index c1a7eb3..bd09bc4 100755
--- a/tks.pl
+++ b/tks.pl
@@ -81,6 +81,8 @@ foreach my $date ( sort keys %{$tkdata} ) {
 
         next unless $args->{'-c'};
 
+        $entry->{time} = int($entry->{time} * 100 + .5) / 100;
+
         # add the time to wrms
         $wrms->add_time(
             $entry->{wr},
-- 
2.39.5