Add a "total score" for each player the score screen.
authorSteinar H. Gunderson <sesse@samfundet.no>
Mon, 14 Feb 2005 14:13:47 +0000 (14:13 +0000)
committerSteinar H. Gunderson <sesse@samfundet.no>
Mon, 14 Feb 2005 14:13:47 +0000 (14:13 +0000)
html/show-tournament.pl
html/templates/show-tournament.tmpl

index 8d6dc45..b204270 100755 (executable)
@@ -30,7 +30,7 @@ for my $score (@$scores) {
        my $p = $rounds[$#rounds]->{'parallels'};
        if ($score->{'parallel'} != $parallel) {
                $parallel = $score->{'parallel'};
-               push @$p, { parallel => $parallel, players => [], songs => [] };
+               push @$p, { parallel => $parallel, players => [], songs => [], num_songs => 0 };
                $player = '';
 
                # Information on songs is not selected from roundrandomsongs etc.,
@@ -43,12 +43,13 @@ for my $score (@$scores) {
                } else {
                        push @{$p->[$#$p]->{'songs'}}, $score->{'title'};
                }
+               $p->[$#$p]->{'num_songs'}++;
        }
        
        my $pl = $p->[$#$p]->{'players'};
        if ($score->{'nick'} ne $player) {
                $player = $score->{'nick'};
-               push @$pl, { nick => $player, songs => [] };
+               push @$pl, { nick => $player, songs => [], total => 0 };
 
        }
        
@@ -57,6 +58,7 @@ for my $score (@$scores) {
                chosen => $score->{'chosen'},
                score => $score->{'score'}
        };
+       $pl->[$#$pl]->{'total'} += $score->{'score'};
 }
 
 ccbs::print_header();
index 9588c52..733b1cf 100644 (file)
@@ -36,6 +36,9 @@
 [% FOR s = p.songs %]
       <th>[% s %]</th>
 [% END %]
+[% IF p.num_songs > 1 %]
+      <th>Total</th>
+[% END %]      
     </tr>
     
 [% FOR pl = p.players %]
 [% IF s.chosen %]
         : [% s.title %]
 [% END %]
-</td>
+      </td>
 [% END %]
+[% IF p.num_songs > 1 %]
+     <td>[% pl.total %]</td>
+[% END %]      
     </tr>
 [% END %]
   </table>