--- loncom/interface/lonwhatsnew.pm 2006/05/30 20:16:23 1.56 +++ loncom/interface/lonwhatsnew.pm 2006/06/03 21:05:04 1.58 @@ -1,5 +1,5 @@ # -# $Id: lonwhatsnew.pm,v 1.56 2006/05/30 20:16:23 raeburn Exp $ +# $Id: lonwhatsnew.pm,v 1.58 2006/06/03 21:05:04 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -228,8 +228,9 @@ END '; } - return &Apache::loncommon::start_page(&mt('[_1] Action Items', - $env{'course.'.$env{'request.course.id'}.'.type'}),$scripttag); + my $course_type=&Apache::loncommon::course_type(); + return &Apache::loncommon::start_page($course_type.' Action Items', + $scripttag); } #------------------------------- @@ -769,8 +770,9 @@ sub getitems { # Maxtries and degree of difficulty for problem parts, unless handgradeable if ($$show{'abovethreshold'}) { - &check_thresholds($resource,$symb,\%resourcetracker,$triggered, - $threshold,$warnings,$warningnum,$rowColor1,$rowColor2); + $warningnum = &check_thresholds($resource,$symb,\%resourcetracker, + $triggered,$threshold,$warnings, + $warningnum,$rowColor1,$rowColor2); } } @@ -880,7 +882,7 @@ sub check_thresholds { } } if ($warning) { - if ($$warningnum %2 == 1) { + if ($warningnum%2 == 1) { $rowColor = $rowColor1; } else { $rowColor = $rowColor2; @@ -912,8 +914,9 @@ sub check_thresholds { } } push(@{$warnings},$symb); - $$warningnum ++; + $warningnum ++; } + return $warningnum; }