Misc. changes -- some formatting and add a preliminary "start new round" form.
[ccbs] / html / show-tournament.pl
index b204270..87df626 100755 (executable)
@@ -61,10 +61,13 @@ for my $score (@$scores) {
        $pl->[$#$pl]->{'total'} += $score->{'score'};
 }
 
+my $num_rounds = scalar @rounds;
+
 ccbs::print_header();
 ccbs::process_template('show-tournament.tmpl', $tournament->{'tournamentname'}, {
        tournament => $tournament,
        rankings => $rankings,
-       rounds => \@rounds
+       rounds => \@rounds,
+       num_rounds => $num_rounds
 });
 $dbh->disconnect;