--- loncom/lonnet/perl/lonnet.pm 2025/02/07 22:54:30 1.1172.2.146.2.28 +++ loncom/lonnet/perl/lonnet.pm 2025/06/06 21:18:46 1.1172.2.146.2.29 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.1172.2.146.2.28 2025/02/07 22:54:30 raeburn Exp $ +# $Id: lonnet.pm,v 1.1172.2.146.2.29 2025/06/06 21:18:46 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -14301,7 +14301,7 @@ sub receipt { } sub whichuser { - my ($passedsymb)=@_; + my ($passedsymb,$ignorecachednull)=@_; my ($symb,$courseid,$domain,$name,$publicuser); if (defined($env{'form.grade_symb'})) { my ($tmp_courseid)=&get_env_multiple('form.grade_courseid'); @@ -14321,7 +14321,7 @@ sub whichuser { } } if (!$passedsymb) { - $symb=&symbread(); + $symb=&symbread('','',$ignorecachednull); } else { $symb=$passedsymb; }