X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FGruntmaster%2FPage%2FSt.pm;h=562e4678cc2ab085ad24e247e8e635dd2cba06f0;hb=4fffff7c5a0669e2860cf1428f8f4c4f9fddabea;hp=407e87a09dfce80b9ab3517ecf9d3eb64e32577f;hpb=e16bffb9dda7489a0d50894da0be2b6822ae9210;p=gruntmaster-page.git diff --git a/lib/Gruntmaster/Page/St.pm b/lib/Gruntmaster/Page/St.pm index 407e87a..562e467 100644 --- a/lib/Gruntmaster/Page/St.pm +++ b/lib/Gruntmaster/Page/St.pm @@ -27,6 +27,14 @@ sub calc_score{ int $score + 0.5 } +sub usname ($) { + local $Gruntmaster::Data::contest; + my $user = shift; + my $name = user_name $user; + "$name ($user)" +} + + sub _generate{ my ($self, $htc, $lang, $env, $ct) = @_; debug $env => "language is '$lang' and contest is '$ct'"; @@ -58,7 +66,7 @@ sub _generate{ my @st = sort { $b->{score} <=> $a->{score} or $a->{user} cmp $b->{user}} map { my $user = $_; +{ - user => user_name $user, + user => usname $user, score => sum (values $scores{$user}), scores => [map { $scores{$user}{$_} // '-'} @problems], problems => $Gruntmaster::Data::contest,