loncom/lonnet/perl/lonnet.pm - diff

Return to lonnet.pm CVS log

Up to [LON-CAPA] / loncom / lonnet / perl

version 1.1432, 2020/11/24 14:59:05	version 1.1433, 2020/11/24 16:36:35
Line 5015 sub courseacclog {	Line 5015 sub courseacclog {
$what.=':'.$formitem.'='.$env{$key};	$what.=':'.$formitem.'='.$env{$key};
} elsif ($formitem !~ /^HWFILE(?:[^.]+)$/) {	} elsif ($formitem !~ /^HWFILE(?:[^.]+)$/) {
if ($formitem eq 'proctorpassword') {	if ($formitem eq 'proctorpassword') {
$what.=':'.$formitem.'=********';	$what.=':'.$formitem.'=' . '*' x length($env{$key});
} else {	} else {
$what.=':'.$formitem.'='.$env{$key};	$what.=':'.$formitem.'='.$env{$key};
}	}