X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/3d967be3d2f32e2b00f5f55769edcbf5be866ce6..93c6ec51f6bb239eb52c3e0b0d1adf87f57796ee:/SL/User.pm diff --git a/SL/User.pm b/SL/User.pm index 2115ddc76..0fbd66a39 100644 --- a/SL/User.pm +++ b/SL/User.pm @@ -445,6 +445,7 @@ sub process_perl_script { $dbh->begin_work(); + # setup dbup_ export vars my %dbup_myconfig = (); map({ $dbup_myconfig{$_} = $form->{$_}; } qw(dbname dbuser dbpasswd dbhost dbport dbconnect));