X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/8cd05ad64866ce200f888a35723ae4b7e24a2012..3a94f4d2dd9a835d4a7007e1b999ea00b3c4e1cd:/SL/User.pm diff --git a/SL/User.pm b/SL/User.pm index becfcb799..520bf4229 100644 --- a/SL/User.pm +++ b/SL/User.pm @@ -581,7 +581,7 @@ sub dbupdate { closedir(SQLDIR); } - my $db_charset = $main::dbcharset; + my $db_charset = $::lx_office_conf{system}->{dbcharset}; $db_charset ||= Common::DEFAULT_CHARSET; my $dbupdater = SL::DBUpgrade2->new(form => $form, dbdriver => $form->{dbdriver}); @@ -648,7 +648,7 @@ sub dbupdate2 { $form->{sid} = $form->{dbdefault}; my $rc = -2; - my $db_charset = $main::dbcharset || Common::DEFAULT_CHARSET; + my $db_charset = $::lx_office_conf{system}->{dbcharset} || Common::DEFAULT_CHARSET; map { $_->{description} = SL::Iconv::convert($_->{charset}, $db_charset, $_->{description}) } values %{ $dbupdater->{all_controls} };