our @ISA = qw/Gruntmaster::Page::Base/;
our $VERSION = '0.001';
-use constant FORMATS => [qw/CPP/];
-
use constant TEMPLATES => {
en => <<'HTML',
<tmpl_var ESCAPE=0 statement>
sub _generate{
my ($self, $htc, $path, $lang) = @_;
- $path =~ m,(?:ct/([^/])+/)?pb/(\w+)\.html$,;
+ $path =~ m,(?:ct/([^/]+)/)?pb/(\w+)\.html$,;
my ($contest, $id) = ($1, $2);
$htc->param(cansubmit => 1);
if (defined $contest) {
- $htc->param(cansubmit => time >= contest_start $contest && time <= contest_end $contest);
+ $htc->param(cansubmit => time <= contest_end $contest);
$htc->param(contest => $contest);
}
- $htc->param(formats => FORMATS);
+ $htc->param(formats => Gruntmaster::Page::Submit::FORMATS);
$htc->param(id => $id);
local $Gruntmaster::Data::contest = $contest if $contest;
$htc->param(name => problem_name $id);
+ $htc->param(author => problem_author $id);
+ $htc->param(owner => problem_owner $id);
$htc->param(statement => problem_statement $id);
}