X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FTemplate.pm;h=39157d2d2c9bf5b6ee74e47cfbe89bda171c956b;hb=1edebcf0aed748b75fa68e46aad70dbeeadfdd85;hp=df6dbec7cdfe2000c1813d820abbd96ea971d527;hpb=9ead220cfa6c48e0242efc920429e7b393f055f2;p=kivitendo-erp.git

diff --git a/SL/Template.pm b/SL/Template.pm
index df6dbec7c..39157d2d2 100644
--- a/SL/Template.pm
+++ b/SL/Template.pm
@@ -25,7 +25,13 @@ sub create {
   my %params  = @_;
   my $package = "SL::Template::" . $params{type};
 
-  $package->new($params{file_name}, $params{form}, $params{myconfig} || \%::myconfig, $params{userspath} || $::lx_office_conf{paths}->{userspath});
+  $package->new(
+    %params,
+    source    => $params{file_name},
+    form      => $params{form},
+    myconfig  => $params{myconfig}  || \%::myconfig,
+    userspath => $params{userspath} || $::lx_office_conf{paths}->{userspath},
+  );
 }
 
 sub available_templates {
@@ -46,7 +52,7 @@ sub available_templates {
   } keys %dir_h;
 
   tie %dir_h, 'IO::Dir', "$::lx_office_conf{paths}->{templates}/print";
-  my @allmaster = ('Standard', sort grep { -d ("$::lx_office_conf{paths}->{templates}/print" . "/$_") && !/^\.\.?$/ && !/^Standard$/ } keys %dir_h);
+  my @allmaster = (sort grep { -d ("$::lx_office_conf{paths}->{templates}/print" . "/$_") && !/^\.\.?$/ && !/^Standard$/ } keys %dir_h);
 
   return (
     print_templates  => \@alldir,