--- loncom/interface/lonwhatsnew.pm 2013/03/05 22:51:48 1.111 +++ loncom/interface/lonwhatsnew.pm 2013/07/04 16:35:12 1.113 @@ -1,5 +1,5 @@ # -# $Id: lonwhatsnew.pm,v 1.111 2013/03/05 22:51:48 raeburn Exp $ +# $Id: lonwhatsnew.pm,v 1.113 2013/07/04 16:35:12 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -688,7 +688,7 @@ sub display_threshold_config { foreach my $type (@thresholditems) { my $parameter = $env{'request.course.id'}.':threshold_'.$type; # onchange is javascript to automatically check the 'Set' button. - my $onchange = 'onFocus="javascript:window.document.forms'. + my $onchange = 'onfocus="javascript:window.document.forms'. "['thresholdform'].elements['".$parameter."_setparmval']". '.checked=true;"'; $r->print(&Apache::loncommon::start_data_table_row()."\n". @@ -1347,24 +1347,24 @@ sub getactivated { if (keys(%changes) > 0) { foreach my $chg (keys(%changes)) { if (ref($changes{$chg}) eq 'HASH') { + next if ($changes{$chg}{'delflag'}); if ($rolechgtime > 0) { - next if ($changes{$chg}{'exe_time'} < $rolechgtime); + next if ($changes{$chg}{'exe_time'} < $rolechgtime); } if ($changes{$chg}{'exe_time'}) { my $timestamp = $changes{$chg}{'exe_time'}; if (ref($changes{$chg}{'logentry'}) eq 'HASH') { - next if ($changes{$chg}{'delflag'}); - my $start = $changes{$chg}{'logentry'}{'start'}; my $end = $changes{$chg}{'logentry'}{'end'}; - my $section = $changes{$chg}{'logentry'}{'section'}; - my $role = $changes{$chg}{'logentry'}{'role'}; - my $uname = $changes{$chg}{'uname'}; - my $udom = $changes{$chg}{'udom'}; next if ($end && $end <= $now); + my $start = $changes{$chg}{'logentry'}{'start'}; + next if ($start >= $timestamp); + my $section = $changes{$chg}{'logentry'}{'section'}; if (($viewablesec ne '') && ($section ne '')) { next if ($viewablesec ne $section); } - next if ($start >= $timestamp); + my $role = $changes{$chg}{'logentry'}{'role'}; + my $uname = $changes{$chg}{'uname'}; + my $udom = $changes{$chg}{'udom'}; if ($role eq 'st') { $stucounted{$uname.':'.$udom.':'.$section} = $start.':'.$end; } else {