use List::MoreUtils qw(any);
use SL::Common;
+use SL::DBUtils;
use SL::Iconv;
use strict;
$db_charset ||= Common::DEFAULT_CHARSET;
- my $iconv = SL::Iconv::get_converter($file_charset, $db_charset);
+ my $iconv = SL::Iconv->new($file_charset, $db_charset);
$dbh->begin_work();
return 0 if !@unapplied_scripts;
- my $db_charset = $main::dbcharset || Common::DEFAULT_CHARSET;
+ my $db_charset = $::lx_office_conf{system}->{dbcharset} || Common::DEFAULT_CHARSET;
$self->{form}->{login} ||= 'admin';
map { $_->{description} = SL::Iconv::convert($_->{charset}, $db_charset, $_->{description}) } values %{ $self->{all_controls} };