Misc. changes -- some formatting and add a preliminary "start new round" form.

[ccbs] / html / show-tournament.pl

diff --git a/html/show-tournament.pl b/html/show-tournament.pl
index b204270422048e58ee57d461c324df362a509efb..87df626191e301cd01851f47e8b59a2ebd7d7c03 100755 (executable)
--- a/html/show-tournament.pl
+++ b/html/show-tournament.pl
@@ -61,10 +61,13 @@ for my $score (@$scores) {
        $pl->[$#$pl]->{'total'} += $score->{'score'};
 }
 
        $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,
 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;
 });
 $dbh->disconnect;