sub process_skel {
my ($tree, %args) = @_;
+ $tree->fid('logo')->replace_with(literal scalar read_file "mclogo.svg");
$tree->content_handler(
title => $args{title},
content => literal $args{meat});
sub process_ct_entry {
my ($tree, %args) = @_;
$_->edit_href (sub {s/contest_id/$args{id}/}) for $tree->find('a');
+ $tree->fid('editorial')->detach unless $args{finished};
$tree->fid('links')->detach unless $args{started};
my $status = ($args{time} < $args{start} ? 'starts' : 'ends');
$tree->fclass('timer')->attr('data-stop', $status eq 'ends' ? $args{stop} : $args{start});
$tr->fclass('contest')->namedlink($data->{contest}, $data->{contest_name}) if $data->{contest};
$tr->fclass('contest')->replace_content('None') unless $data->{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('source')->namedlink("$data->{id}.$data->{extension}", sprintf "%.2fKB %s", $data->{size}/1024, $data->{format});
$tr->fclass('owner')->namedlink($data->{owner}, $data->{owner_name});
$tr->fclass('result_text')->replace_content($data->{result_text});
$tr->fclass('result_text')->attr(class => "r$data->{result}");