--- loncom/interface/lonviewclasslist.pm 2004/08/27 04:18:11 1.2 +++ loncom/interface/lonviewclasslist.pm 2004/12/08 19:30:58 1.3 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to display the classlist # -# $Id: lonviewclasslist.pm,v 1.2 2004/08/27 04:18:11 raeburn Exp $ +# $Id: lonviewclasslist.pm,v 1.3 2004/12/08 19:30:58 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -78,7 +78,6 @@ sub handler { my $bodytag=&Apache::loncommon::bodytag('Classlist'); my $breadcrumbs=&Apache::lonhtmlcommon::breadcrumbs(undef, 'Enrollment Manager'); - $r->print(< @@ -87,7 +86,6 @@ sub handler { $bodytag $breadcrumbs ENDHEADER - # # Print classlist my $cid = $ENV{'request.course.id'}; @@ -115,7 +113,6 @@ sub allowed_to_view_classlist { } else { return 0; } - } sub html_classlist { @@ -166,13 +163,12 @@ sub html_classlist { } my $section = $classlist->{$student}->[$sectionidx]; my $status = $classlist->{$student}->[$statusidx]; -# next if (lc($status) ne 'active'); + next if (lc($status) ne 'active'); if ($limit_to_section) { if ($section ne $ENV{'request.course.sec'}) { next; } } - $Str .= ''. ''.$count++.''. ''.&Apache::loncommon::aboutmewrapper($fullname,