Fix to stop using MD5 module that was deprecated

This commit is contained in:
Ilia Ross
2025-03-14 14:42:49 +02:00
parent 45ef8d11c1
commit f2307ae1fa
3 changed files with 4 additions and 4 deletions

View File

@ -10,7 +10,7 @@ our (%text, %in, %access, $squid_version, %config, $module_name);
require './squid-lib.pl';
if ($config{'crypt_conf'} == 1) {
eval "use MD5";
eval "use Digest::MD5";
if ($@) {
&error(&text('eauth_nomd5', $module_name));
}

View File

@ -9,7 +9,7 @@ no warnings 'uninitialized';
our (%text, %in, %access, $squid_version, %config, $module_name);
require './squid-lib.pl';
if ($config{'crypt_conf'} == 1) {
eval "use MD5";
eval "use Digest::MD5";
if ($@) {
&error(&text('eauth_nomd5', $module_name));
}

View File

@ -13,7 +13,7 @@ sub useradmin_create_user
my ($uinfo) = @_;
return if (!$config{'sync_create'});
if ($config{'crypt_conf'} == 1) {
eval "use MD5";
eval "use Digest::MD5";
return if ($@);
}
return if ($uinfo->{'passmode'} != 3);
@ -78,7 +78,7 @@ sub useradmin_modify_user
my ($uinfo) = @_;
return if (!$config{'sync_modify'});
if ($config{'crypt_conf'} == 1) {
eval "use MD5";
eval "use Digest::MD5";
return if ($@);
}
my $conf = &get_config();