--- loncom/lonnet/perl/lonnet.pm 2025/04/02 23:44:03 1.1538 +++ loncom/lonnet/perl/lonnet.pm 2025/06/06 20:36:56 1.1539 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.1538 2025/04/02 23:44:03 raeburn Exp $ +# $Id: lonnet.pm,v 1.1539 2025/06/06 20:36:56 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -15171,7 +15171,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'); @@ -15194,7 +15194,7 @@ sub whichuser { } } if (!$passedsymb) { - $symb=&symbread(); + $symb=&symbread('','',$ignorecachednull); } else { $symb=$passedsymb; }