sub output {
   my ($self, $tmpl) = @_;

   my $lang = $self->language;
   $lang->translate_templ($tmpl);

   return ($tmpl->output);
}