X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FGruntmaster%2FPage%2FLog%2FEntry.pm;h=e20c891307960a6fc5c1fd71679ef370c04134fc;hb=bb95f538bf263c0294d87cfb90d58c66117b9aab;hp=8fed9a19fb6aa3b28730a900c07d088ef511eb19;hpb=4aa8ba862bf3a79362df73c3d1e8707e8135af23;p=gruntmaster-page.git diff --git a/lib/Gruntmaster/Page/Log/Entry.pm b/lib/Gruntmaster/Page/Log/Entry.pm index 8fed9a1..e20c891 100644 --- a/lib/Gruntmaster/Page/Log/Entry.pm +++ b/lib/Gruntmaster/Page/Log/Entry.pm @@ -3,16 +3,11 @@ package Gruntmaster::Page::Log::Entry; use 5.014000; use strict; use warnings; -use parent qw/Exporter/; -our @EXPORT_OK = qw/generate/; +use Gruntmaster::Page::Base log_entry => 'Job '; +our @ISA = qw/Gruntmaster::Page::Base/; our $VERSION = '0.001'; -use HTML::Template::Compiled; -use POSIX qw/strftime/; -use Gruntmaster::Page::Common qw/cook_templates reload_templates/; -use Gruntmaster::Data qw/job_results/; - -my %orig_templates = ( +use constant TEMPLATES => { en => <<'HTML', @@ -22,18 +17,15 @@ my %orig_templates = (
HTML -); +}; -my %templates = cook_templates %orig_templates, log_entry => 'Job '; +sub _generate{ + my ($self, $htc, $path, $lang) = @_; -sub generate{ - %templates = cook_templates %orig_templates, log_entry => 'Job ' if reload_templates; - $_[0] =~ m,^(?:ct/([^/]+)/)?log/job/([^/]+)\.html$,; + $path =~ m,^(?:ct/([^/]+)/)?log/job/([^/]+)\.html$,; local $Gruntmaster::Data::contest = $1; my $id = $2; - my $htc = HTML::Template::Compiled->new(scalarref => \$templates{$_[1]}); - my @tests = map { $_->{time} = sprintf "%.4fs", $_->{time}; $_ @@ -41,7 +33,6 @@ sub generate{ $htc->param(id => $id); $htc->param(tests => \@tests); - $htc->output } 1