From 961d2d99a039706fd4fe76a6b3d5924761e5119a Mon Sep 17 00:00:00 2001 From: Moritz Bunkus Date: Tue, 25 Jan 2011 11:57:09 +0100 Subject: [PATCH] =?utf8?q?Alle=20Variablen=20aus=20%myconfig=20beim=20Druc?= =?utf8?q?ken=20als=20"myconfig=5Fxyz"=20zur=20Verf=C3=BCgung=20stellen?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- SL/Form.pm | 1 + 1 file changed, 1 insertion(+) 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); -- 2.20.1