projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
In Helper kein use SL::DB::Objects
[kivitendo-erp.git]
/
SL
/
Dispatcher
/
AuthHandler
/
User.pm
diff --git
a/SL/Dispatcher/AuthHandler/User.pm
b/SL/Dispatcher/AuthHandler/User.pm
index
e126d87
..
5ee543b
100644
(file)
--- a/
SL/Dispatcher/AuthHandler/User.pm
+++ b/
SL/Dispatcher/AuthHandler/User.pm
@@
-11,6
+11,9
@@
sub handle {
my $login = $::form->{'{AUTH}login'} || $::auth->get_session_value('login');
return $self->_error(%param) if !defined $login;
my $login = $::form->{'{AUTH}login'} || $::auth->get_session_value('login');
return $self->_error(%param) if !defined $login;
+ my $client_id = $::form->{'{AUTH}client_id'} || $::auth->get_session_value('client_id');
+ return $self->_error(%param) if !$client_id || !$::auth->set_client($client_id);
+
%::myconfig = $::auth->read_user(login => $login);
return $self->_error(%param) unless $::myconfig{login};
%::myconfig = $::auth->read_user(login => $login);
return $self->_error(%param) unless $::myconfig{login};