base: adjust default selection (base20, ≤40)
authorMischa POSLAWSKY <perl@shiar.org>
Mon, 23 Apr 2012 00:29:22 +0000 (02:29 +0200)
committerMischa POSLAWSKY <perl@shiar.org>
Fri, 19 Apr 2013 15:10:15 +0000 (17:10 +0200)
base.plp

index 0ba0613210a21bc0105ac3cf2f3600c549994d38..cba5242966a6f622a933cb027965e6fc05491709 100644 (file)
--- a/base.plp
+++ b/base.plp
@@ -19,8 +19,8 @@ Html({
 <:
 use Math::BigFloat;
 
 <:
 use Math::BigFloat;
 
-my @cols = (2, 6, 8, 9, 10, 12, 16, 18);
-my $count = 42;
+my @cols = (2, 6, 8, 9, 10, 12, 16, 18, 20);
+my $count = 40;
 print '<tr><th>';
 print '<th>', $_ for @cols;
 
 print '<tr><th>';
 print '<th>', $_ for @cols;