Revision 722fee3c
Von Moritz Bunkus vor mehr als 11 Jahren hinzugefügt
| SL/Dispatcher/AuthHandler/User.pm | ||
|---|---|---|
| 11 | 11 |
my $login = $::form->{'{AUTH}login'} || $::auth->get_session_value('login');
|
| 12 | 12 |
return $self->_error(%param) if !defined $login; |
| 13 | 13 |
|
| 14 |
my $client_id = $::form->{'{AUTH}client_id'} || $::auth->get_session_value('client_id');
|
|
| 15 |
return $self->_error(%param) if !$client_id || !$::auth->set_client($client_id); |
|
| 16 |
|
|
| 14 | 17 |
%::myconfig = $::auth->read_user(login => $login); |
| 15 | 18 |
|
| 16 | 19 |
return $self->_error(%param) unless $::myconfig{login};
|
Auch abrufbar als: Unified diff
Userlogin mit Mandanten gefixt (erster Schritt)