X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FAuth.pm;h=94f843a6d926df6ee91bfbc42b498249dfb15a14;hb=8462da9aa85181d2c76f22ceca33be56bd6d6720;hp=094b58bdada1e3cea747a2935939eab8e82e4235;hpb=04f6532ec2d156a989d47da1bb8b76133539bc34;p=kivitendo-erp.git diff --git a/SL/Auth.pm b/SL/Auth.pm index 094b58bda..94f843a6d 100644 --- a/SL/Auth.pm +++ b/SL/Auth.pm @@ -358,7 +358,7 @@ sub read_user { my $login = shift; my $dbh = $self->dbconnect(); - my $query = qq|SELECT cfg.cfg_key, cfg.cfg_value + my $query = qq|SELECT u.id, u.login, cfg.cfg_key, cfg.cfg_value FROM auth.user_config cfg LEFT JOIN auth."user" u ON (cfg.user_id = u.id) WHERE (u.login = ?)|; @@ -368,7 +368,7 @@ sub read_user { while (my $ref = $sth->fetchrow_hashref()) { $user_data{$ref->{cfg_key}} = $ref->{cfg_value}; - $user_data{login} = $login; + @user_data{qw(id login)} = @{$ref}{qw(id login)}; } $sth->finish();