Vorlagen: Einige Variablen zum Angestellten aus myconfig sollten nur mit dem Praefix...

diff --git a/SL/Form.pm b/SL/Form.pm
index 725eace..cddb621 100644 (file)
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -758,7 +758,7 @@ sub parse_template {
   $self->{"notes"} = $self->{ $self->{"formname"} . "notes" };
 
   map({ $self->{"employee_${_}"} = $myconfig->{$_}; }
-      qw(email tel fax name signature));
+      qw(email tel fax name signature company address businessnumber));
 
   open(IN, "$self->{templates}/$self->{IN}")
     or $self->error("$self->{IN} : $!");

diff --git a/SL/IS.pm b/SL/IS.pm
index 31ded06..e29f67f 100644 (file)
--- a/SL/IS.pm
+++ b/SL/IS.pm
@@ -304,9 +304,6 @@ sub invoice_details {
 
   $form->{paid} = $form->format_amount($myconfig, $form->{paid}, 2);
 
-  # myconfig variables
-  map { $form->{$_} = $myconfig->{$_} }
-    (qw(company address tel fax signature businessnumber));
   $form->{username} = $myconfig->{name};
 
   $dbh->disconnect;