From 2f64c84b9131ca0b863b53c89a0a637b1fb537fc Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Wed, 23 Feb 2005 17:35:35 +0000
Subject: [PATCH] times sigh

---
 perl/Thingy/Dx.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl/Thingy/Dx.pm b/perl/Thingy/Dx.pm
index 1311e8f1..3621d254 100644
--- a/perl/Thingy/Dx.pm
+++ b/perl/Thingy/Dx.pm
@@ -31,7 +31,7 @@ sub gen_Aranea
 		$thing->{f} = $sd->[0];
 		$thing->{c} = $sd->[1];
 		$thing->{b} = $sd->[4] unless $thing->{user};
-		my $t = $sd->[2];
+		my $t = int($sd->[2] / 60);
 		$thing->{t} = sprintf("%X", $t) unless $t eq int($main::systime / 60);
 		$thing->{o} =  $sd->[7] unless $sd->[7] eq $main::mycall; 
 		$thing->{i} = $sd->[3] if $sd->[3];
-- 
2.34.1