--- loncom/homework/grades.pm 2007/09/02 01:59:57 1.437 +++ loncom/homework/grades.pm 2007/09/02 02:10:31 1.438 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # The LON-CAPA Grading handler # -# $Id: grades.pm,v 1.437 2007/09/02 01:59:57 www Exp $ +# $Id: grades.pm,v 1.438 2007/09/02 02:10:31 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -7118,9 +7118,10 @@ sub gather_clicker_ids { # Set up a couple variables. my $username_idx = &Apache::loncoursedata::CL_SNAME(); my $domain_idx = &Apache::loncoursedata::CL_SDOM(); + my $status_idx = &Apache::loncoursedata::CL_STATUS(); foreach my $student (keys(%$classlist)) { - + if ($classlist->{$student}->[$status_idx] ne 'Active') { next; } my $username = $classlist->{$student}->[$username_idx]; my $domain = $classlist->{$student}->[$domain_idx]; my $clickers =