$tr->defmap(class => $data);
$tr->fclass('result_text')->attr(class => "r$data->{result}")
};
+ $tree->fclass('result_text')->replace_content($args{result_text});
+ $tree->fclass('result_text')->attr(class => "r$args{result}");
$args{results} ? $tree->fid('results')->find('tbody')->find('tr')->iter3($args{results}, $iter) : $tree->fid('results')->detach;
$tree->fid('no_results')->detach if $tree->fid('results') || $tree->fid('errors');
}
$tr->fclass('problem')->namedlink($data->{problem}, $data->{problem_name});
$tr->fclass('problem')->find('a')->edit_href(sub{$_ .= "?contest=$args{contest}"}) if $args{contest};
$tr->fclass('date')->replace_content(ftime $data->{date});
+ $tr->fclass('format')->replace_content($data->{format});
$tr->fclass('size')->namedlink("$data->{id}.$data->{extension}", sprintf "%.2fKB", $data->{size}/1024);
$tr->fclass('size')->attr('data-private', '') if $data->{private};
$tr->fclass('owner')->namedlink($data->{owner}, $data->{owner_name});
$tree->find('table')->find('tbody')->find('tr')->iter3($args{log}, $iter);
$args{next_page} ? $tree->fclass('next')->namedlink($args{next_page}, 'Next') : $tree->fclass('next')->detach;
$args{previous_page} ? $tree->fclass('previous')->namedlink($args{previous_page}, 'Previous') : $tree->fclass('previous')->detach;
+ for my $cls (qw/next previous/) {
+ my $elem = $tree->fclass($cls);
+ next unless $elem;
+ delete $args{args}{page};
+ my $str = join '&', map { $_ . '=' . $args{args}{$_} } keys %{$args{args}};
+ $elem->find('a')->edit_href(sub{s/$/&$str/});
+ }
$tree->fclass('current')->replace_content("Page $args{current_page} of $args{last_page}");
}
my $pbiter = sub {
my ($data, $th) = @_;
$th->attr(class => undef);
- $th->namedlink($data->id, $data->name);
+ $th->namedlink(@$data);
};
$tree->fclass('problem')->iter3($args{problems}, $pbiter);
my $iter = sub {