diff options
author | ivan <ivan> | 2005-05-22 23:38:23 +0000 |
---|---|---|
committer | ivan <ivan> | 2005-05-22 23:38:23 +0000 |
commit | d6201f16363d98531f37f4d7bae5ed86c0614552 (patch) | |
tree | 83a83812290551da07d91c86caa8ef8353e90e8e | |
parent | 8d5366cf84513ed7e7832315fb3d36c49f4f9a8a (diff) |
fix quick crypt_password bug when its passwd an empty param
-rw-r--r-- | FS/FS/svc_acct.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/FS/FS/svc_acct.pm b/FS/FS/svc_acct.pm index 6e4213d02..a0451938a 100644 --- a/FS/FS/svc_acct.pm +++ b/FS/FS/svc_acct.pm @@ -1327,7 +1327,7 @@ sub crypt_password { { $self->_password; } else { - my $encryption = scalar(@_) ? shift : 'crypt'; + my $encryption = ( scalar(@_) && $_[0] ) ? shift : 'crypt'; if ( $encryption eq 'crypt' ) { crypt( $self->_password, |