From: Moritz Bunkus Date: Mon, 23 May 2011 09:00:46 +0000 (+0200) Subject: Vor DB-Update aus Admin-Bereich %::myconfig mit DB-Variablen füllen X-Git-Tag: release-2.6.3~25^2~8^2~6 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=8a6cb88a72a52a635ebdd95031d94ff88666bbbd;p=kivitendo-erp.git Vor DB-Update aus Admin-Bereich %::myconfig mit DB-Variablen füllen Die RDBOs benutzen beim DB-Connect die Werte aus %::myconfig -- anders als die Legacy-Funktionen in SL/User.pm. Die Admin-Funktion "Datebankadministration -> Datenbank aktualisieren" muss dementsrechend nicht nur $::form (für SL/User.pm), sondern auch %::myconfig bestücken. Fix für Bug 1661. --- diff --git a/bin/mozilla/admin.pl b/bin/mozilla/admin.pl index ddb12b1d8..efd16fecf 100755 --- a/bin/mozilla/admin.pl +++ b/bin/mozilla/admin.pl @@ -739,7 +739,8 @@ sub dbupdate { foreach my $i (@update_rows) { restore_form($saved_form); - map { $form->{$_} = $form->{"${_}_${i}"} } qw(dbname dbdriver dbhost dbport dbuser dbpasswd); + %::myconfig = (); + map { $form->{$_} = $::myconfig{$_} = $form->{"${_}_${i}"} } qw(dbname dbdriver dbhost dbport dbuser dbpasswd); print $form->parse_html_template("admin/dbupgrade_header");