loncom/interface/domainprefs.pm - diff

Return to domainprefs.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.160.6.118.2.27, 2025/03/15 01:32:13	version 1.160.6.118.2.28, 2025/05/13 07:27:23
Line 14674 sub get_priv_creds {	Line 14674 sub get_priv_creds {
my $privkey = $privhash{'key'};	my $privkey = $privhash{'key'};
$privnum = $privhash{'version'};	$privnum = $privhash{'version'};
if (($privnum) && ($privkey ne '')) {	if (($privnum) && ($privkey ne '')) {
$cipher = Crypt::CBC->new({'key' => $privkey,	$cipher = Crypt::CBC->new(-pass => $privkey,
'cipher' => 'DES'});	-cipher => 'Crypt::DES');
}	}
}	}
}	}