From: Moritz Bunkus Date: Tue, 25 Jan 2011 10:57:09 +0000 (+0100) Subject: Alle Variablen aus %myconfig beim Drucken als "myconfig_xyz" zur Verfügung stellen X-Git-Tag: release-2.6.3~61^2~7^2~1^2~2^2~2 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=961d2d99a039706fd4fe76a6b3d5924761e5119a;p=kivitendo-erp.git Alle Variablen aus %myconfig beim Drucken als "myconfig_xyz" zur Verfügung stellen --- diff --git a/SL/Form.pm b/SL/Form.pm index 56dc795e1..9d08e0ee8 100644 --- a/SL/Form.pm +++ b/SL/Form.pm @@ -1250,6 +1250,7 @@ sub parse_template { } map { $self->{"${_}"} = $myconfig->{$_}; } qw(co_ustid); + map { $self->{"myconfig_${_}"} = $myconfig->{$_} } grep { $_ ne 'dbpasswd' } keys %{ $myconfig }; $self->{copies} = 1 if (($self->{copies} *= 1) <= 0);