X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FGruntmaster%2FPage%2FPb%2FEntry.pm;h=f178b5058232a6d049396352688c666405a517c0;hb=95a9ad1be9a7e32f642d469acb006990c2b86151;hp=4eacd4e0f56ab2eccbc1c63f4c53690bfd06df30;hpb=191f4979def520b8be01554eb954c80ee42df38b;p=plack-app-gruntmaster.git diff --git a/lib/Gruntmaster/Page/Pb/Entry.pm b/lib/Gruntmaster/Page/Pb/Entry.pm index 4eacd4e..f178b50 100644 --- a/lib/Gruntmaster/Page/Pb/Entry.pm +++ b/lib/Gruntmaster/Page/Pb/Entry.pm @@ -7,37 +7,7 @@ use Gruntmaster::Page::Base pb_entry => ''; our @ISA = qw/Gruntmaster::Page::Base/; our $VERSION = '0.001'; -use constant TEMPLATES => { - en => <<'HTML', -
-
- -
- -
-
-
Author
-
Owner
-
- - -

Submit solution

-
- - - -
-
-
- - -
-
-
-HTML -}; +use constant FORMATS => [qw/C CPP MONO JAVA PASCAL PERL PYTHON/]; sub _generate{ my ($self, $htc, $lang, $env, $contest, $id) = @_; @@ -48,7 +18,7 @@ sub _generate{ $htc->param(cansubmit => time <= contest_end $contest); $htc->param(contest => $contest); } - $htc->param(formats => Gruntmaster::Page::Submit::FORMATS); + $htc->param(formats => FORMATS); $htc->param(id => $id); local $Gruntmaster::Data::contest = $contest if $contest; $htc->param(name => problem_name $id);