X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/0e6ac5bb7bad8d3e486f663bf22662098e5669bd..f973611805644e351c5b9699b45b1f7303b026be:/SL/Auth.pm diff --git a/SL/Auth.pm b/SL/Auth.pm index 1d2f36f7c..96514f188 100644 --- a/SL/Auth.pm +++ b/SL/Auth.pm @@ -92,12 +92,12 @@ sub _read_auth_config { sub authenticate_root { $main::lxdebug->enter_sub(); - my $self = shift; - my $password = shift; - my $is_crypted = shift; + my $self = shift; + my $password = shift; + my $is_crypted = shift; - $password = crypt $password, 'ro' if (!$password || !$is_crypted); - my $admin_password = crypt "$self->{admin_password}", 'ro'; + $password = crypt $password, 'ro' if (!$password || !$is_crypted); + my $admin_password = crypt "$self->{admin_password}", 'ro'; $main::lxdebug->leave_sub();