Revision 496f55c6
Von Sven Schöling vor fast 10 Jahren hinzugefügt
| SL/Controller/LoginScreen.pm | ||
|---|---|---|
|
}
|
||
|
|
||
|
%::myconfig = $login ? $::auth->read_user(login => $login) : ();
|
||
|
$::form->{login} = $login;
|
||
|
$::locale = Locale->new($::myconfig{countrycode}) if $::myconfig{countrycode};
|
||
|
SL::Dispatcher::AuthHandler::User->new->handle(countrycode => $::myconfig{countrycode});
|
||
|
|
||
| scripts/console | ||
|---|---|---|
|
|
||
|
die "cannot find user $login" unless %::myconfig = $::auth->read_user(login => $login);
|
||
|
|
||
|
$::form->{login} = $login; # normaly implicit at login
|
||
|
|
||
|
die "cannot find locale for user $login" unless $::locale = Locale->new($::myconfig{countrycode});
|
||
|
|
||
|
$::instance_conf->init;
|
||
| scripts/task_server.pl | ||
|---|---|---|
|
|
||
|
$::auth->restore_session;
|
||
|
|
||
|
$::form->{login} = $lx_office_conf{task_server}->{login};
|
||
|
$::instance_conf->init;
|
||
|
|
||
|
$::form->{__ERROR_HANDLER} = sub { die @_ };
|
||
| t/Support/TestSetup.pm | ||
|---|---|---|
|
|
||
|
die "cannot find user $login" unless %::myconfig = $::auth->read_user(login => $login);
|
||
|
|
||
|
$::form->{login} = $login; # normaly implicit at login
|
||
|
|
||
|
die "cannot find locale for user $login" unless $::locale = Locale->new($::myconfig{countrycode});
|
||
|
|
||
|
$SIG{__DIE__} = sub { Carp::confess( @_ ) } if $::lx_office_conf{debug}->{backtrace_on_die};
|
||
Auch abrufbar als: Unified diff
login nicht aus $::form nehmen. Teil 2
Dabei ergibt sich ein kleines Problem. User spezifische bin/mozilla/
Controller werden geladen bevor das User handling abgeschlossen ist.
Nach dieser Änderung sind die also de facto kaputt.