X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/01204ffdc7790d1d497b7f591e940d50e7c714a7..8bca69f27bb998a9f4c49ab3c791271bfbb1b6c3:/SL/Auth.pm

diff --git a/SL/Auth.pm b/SL/Auth.pm
index ff77bfcc7..569ec2149 100644
--- a/SL/Auth.pm
+++ b/SL/Auth.pm
@@ -1117,7 +1117,7 @@ sub load_rights_for_user {
   my $dbh   = $self->dbconnect;
   my ($query, $sth, $row, $rights);
 
-  $rights = { map { $rights->{$_} = 0 } all_rights() };
+  $rights = { map { $rights->{$_} => 0 } all_rights() };
 
   $query =
     qq|SELECT gr."right", gr.granted