X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=lib%2FPackages%2FTemplate.pm;h=554f2ce0e4c8551248ad625a9d0224190c1fff01;hb=10253a9c867f3036137ef5ed5379da930ef04c20;hp=7d85f46ba1cd53b1c3315bfc32525df0d89775c6;hpb=c40b1514a9289273df1ae785fd938b8fa0f31183;p=deb%2Fpackages.git diff --git a/lib/Packages/Template.pm b/lib/Packages/Template.pm index 7d85f46..554f2ce 100644 --- a/lib/Packages/Template.pm +++ b/lib/Packages/Template.pm @@ -38,6 +38,7 @@ sub new { %$options, } ) or fatal_error( sprintf( _g( "Initialization of Template Engine failed: %s" ), $Template::ERROR ) ); $self->{format} = $format; + $self->{vars} = $vars; return $self; } @@ -56,6 +57,10 @@ sub page { #use Data::Dumper; #die Dumper($self, $action, $page_content); + $page_content->{used_langs} ||= [ 'en' ]; + $page_content->{langs} = languages( $page_content->{lang} + || $self->{vars}{lang} || 'en', + @{$page_content->{used_langs}} ); my $txt; $self->process("$self->{format}/$action.tmpl", $page_content, \$txt) @@ -77,18 +82,6 @@ sub error_page { return $txt; } -sub trailer { - my ($self, $NAME, $LANG, $USED_LANGS, $timediff) = @_; - - my $langs = languages( $LANG, @$USED_LANGS ); - - my $txt; - $self->process("$self->{format}/foot.tmpl", { langs => $langs, name => $NAME, benchmark => $timediff ? timestr($timediff) : '' }, \$txt) - or die sprintf( "template error: %s", $self->error ); # too late for reporting on-line - - return $txt; -} - sub languages { my ( $lang, @used_langs ) = @_;