michael/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2026-02-03 14:13:29 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Fix perl warnings

Browse Source
This commit is contained in:
Jamie Cameron
2017-06-10 12:46:33 -07:00
parent 6389fe1787
commit 041ed3ace4
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
useradmin/md5-lib.pl
View File

@@ -242,12 +242,12 @@ if (!&check_blowfish()) {
# SHA1
if (!&check_sha512()) {
my $shash = &encrypt_sha512($passwd, $hash);
return 1 if ($shash eq $hash);
return 1 if ($shash && $shash eq $hash);
}
# Some other hashing, maybe supported by crypt
my $ohash = eval { crypt($passwd, $hash) };
return 1 if ($ohash eq $hash);
return 1 if ($ohash && $ohash eq $hash);
return 0;
}