minor things

[ndwebbie.git] / calls.pl

diff --git a/calls.pl b/calls.pl
index ad7e13c449c20ed2cc8506a9e0b5831d33691c28..e6153a1741fd1df2060bc28b8690104cad987706 100644 (file)
--- a/calls.pl
+++ b/calls.pl
@@ -190,10 +190,10 @@ ORDER BY c.landing_tick DESC
        my @calls;
        my $i = 0;
        while (my $call = $query->fetchrow_hashref){
+               $i++;
                $call->{ODD} = $i % 2;
                $call->{shiptype} = escapeHTML($call->{shiptype});
                push @calls, $call;
-               $i++;
        }
        $BODY->param(Calls => \@calls);
 }