fix increment of native int

perl6 · Nov 3, 2014 · b77224e · b77224e
1 parent 476f600
commit b77224e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/app.pl b/app.pl
@@ -127,7 +127,7 @@
 
         $<distver>    = '0' if $<distver> eq '*';
         $<breadcrumb> = '/recent';
-        @reports.push: recent-line($/) unless $i++ > 100;
+        @reports.push: recent-line($/) unless ($i = $i + 1) > 100;
     }
     for @osnames -> $osname {
         for %stats.keys -> $compver is copy {