cache templates in memory

[ndwebbie.git] / top100.pl

diff --git a/top100.pl b/top100.pl
index 20b0bd1f8c8b582282f30444b997a53742320732..455312c810e70f92b2e375ebc05a34a42095b7c0 100644 (file)
--- a/top100.pl
+++ b/top100.pl
@@ -68,9 +68,9 @@ while (my ($id,$coords,$ruler,$planet,$race,$size,$score,$value,$xp,$sizerank,$s
                $planet{Relationship} = $relationship;
                $planet{isHC} = 1;
        }
+       $i++;
        $planet{ODD} = $i % 2;
        push @planets,\%planet;
-       $i++;
 }
 $BODY->param(Planets => \@planets);