]> wagnertech.de Git - mfinanz.git/blobdiff - SL/Auth.pm
Kosmetik.
[mfinanz.git] / SL / Auth.pm
index 1d2f36f7c4597cc81c2b7fbe0450a8f30e3fa50d..96514f188526f5aa6910a0faa92f546fb4323d86 100644 (file)
@@ -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();