X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=calls.pl;h=8aab04a63540aaa10a071b0ea2a604888fd59ca5;hb=ccf38f8bef1adef7c1ef8797d8c84e477bc82305;hp=ce708fc0df83aa37c90a9c33988111e3bb2bd815;hpb=87ea16a6c380092ec28438082de21d6ec14caa93;p=ndwebbie.git

diff --git a/calls.pl b/calls.pl
index ce708fc..8aab04a 100644
--- a/calls.pl
+++ b/calls.pl
@@ -18,6 +18,8 @@
 #**************************************************************************/
 
 use strict;
+use warnings FATAL => 'all';
+no warnings qw(uninitialized);
 use POSIX;
 our $BODY;
 our $DBH;
@@ -160,7 +162,7 @@ WHERE i.call = ?
 ORDER BY p.x,p.y,p.z});
 	$attackers->execute($call->{id});
 	my @attackers;
-	my $i = 0;
+	$i = 0;
 	while(my $attacker = $attackers->fetchrow_hashref){
 		$i++;
 		$attacker->{ODD} = $i % 2;