--- loncom/lonnet/perl/lonnet.pm 2020/10/26 01:32:59 1.1172.2.118.2.11 +++ loncom/lonnet/perl/lonnet.pm 2020/11/24 16:57:37 1.1172.2.118.2.12 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.1172.2.118.2.11 2020/10/26 01:32:59 raeburn Exp $ +# $Id: lonnet.pm,v 1.1172.2.118.2.12 2020/11/24 16:57:37 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -4733,7 +4733,11 @@ sub courseacclog { if ($formitem =~ /^HWFILE(?:SIZE|TOOBIG)/) { $what.=':'.$formitem.'='.$env{$key}; } elsif ($formitem !~ /^HWFILE(?:[^.]+)$/) { - $what.=':'.$formitem.'='.$env{$key}; + if ($formitem eq 'proctorpassword') { + $what.=':'.$formitem.'=' . '*' x length($env{$key}); + } else { + $what.=':'.$formitem.'='.$env{$key}; + } } } }