use File::Basename;
use List::MoreUtils qw(all);
use List::Util qw(first);
-use POSIX;
use SL::ArchiveZipFixes;
use SL::Auth;
use SL::Dispatcher::AuthHandler;
use SL::Helper::DateTime;
use SL::InstanceConfiguration;
use SL::Template::Plugin::HTMLFixes;
+use SL::User;
# Trailing new line is added so that Perl will not add the line
# number 'die' was called in.
$::lxdebug = LXDebug->new;
$::auth = SL::Auth->new;
$::form = undef;
- %::myconfig = ();
$::request = undef;
+ %::myconfig = User->get_default_myconfig;
}
$SIG{__WARN__} = sub {