--- loncom/interface/lonpickstudent.pm 2007/08/10 23:20:09 1.23 +++ loncom/interface/lonpickstudent.pm 2008/10/10 15:37:46 1.25 @@ -1,7 +1,7 @@ # The LearningOnline Network # Pick a student from the classlist # -# $Id: lonpickstudent.pm,v 1.23 2007/08/10 23:20:09 albertel Exp $ +# $Id: lonpickstudent.pm,v 1.25 2008/10/10 15:37:46 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -128,7 +128,7 @@ ENDSCRIPT &Apache::loncommon::course_type()); $r->print(&Apache::loncommon::start_data_table_row(). ''. - ''.$role.''. &Apache::loncommon::aboutmewrapper(&Apache::loncommon::plainname($puname,$pudom),$puname,$pudom).''. &Apache::loncommon::end_data_table_row()); @@ -208,7 +208,7 @@ ENDSCRIPT /^($LONCAPA::username_re):($LONCAPA::domain_re):(\w+)$/); my ($uname,$udom,$urole)=($1,$2,$3); my $fullname=&Apache::loncommon::plainname($uname,$udom); - next if (($uname!~/^$filter/i) && ($fullname=~/^$filter/i)); + next if (($uname!~/^$filter/i) && ($fullname !~/^$filter/i)); if (!exists($users{"$uname:$udom"})) { $users{"$uname:$udom"} = {'fullname' => $fullname }; @@ -219,7 +219,7 @@ ENDSCRIPT my ($uname,$udom) = split(':',$user); $r->print(&Apache::loncommon::start_data_table_row(). ''. - ''. ''.$uname.''. ''.$udom.''.