--- loncom/interface/lonpickstudent.pm 2020/02/12 16:25:47 1.33 +++ loncom/interface/lonpickstudent.pm 2023/09/28 15:56:48 1.34 @@ -1,7 +1,7 @@ # The LearningOnline Network # Pick a student from the classlist # -# $Id: lonpickstudent.pm,v 1.33 2020/02/12 16:25:47 raeburn Exp $ +# $Id: lonpickstudent.pm,v 1.34 2023/09/28 15:56:48 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -50,7 +50,7 @@ sub handler { &Apache::loncommon::get_unprocessed_cgi ($ENV{'QUERY_STRING'},['filter','form','unameelement','udomelement', - 'roles','courseadv','clicker']); + 'roles','courseadv','clicker','identelement']); # Allowed? my $allowed; if ($env{'request.course.id'}) { @@ -79,7 +79,7 @@ sub handler { FILTER - foreach my $name ('form','unameelement','udomelement','roles','courseadv','clicker') { + foreach my $name ('form','unameelement','udomelement','roles','courseadv','clicker','identelement') { my $value = &HTML::Entities::encode($env{"form.$name"},'<>&"'); $filterbutton .= < @@ -106,11 +106,38 @@ HIDDEN $r->print(< function gochoose(uname,udom) { - opener.document.$env{'form.form'}.elements['$env{'form.unameelement'}'].value=uname; - var slct=opener.document.$env{'form.form'}.elements['$env{'form.udomelement'}']; - var i; - for (i=0;i 0) { + var j; + for (j=0; j