--- loncom/interface/lonwhatsnew.pm 2006/05/30 20:16:23 1.56 +++ loncom/interface/lonwhatsnew.pm 2006/05/31 14:25:02 1.57 @@ -1,5 +1,5 @@ # -# $Id: lonwhatsnew.pm,v 1.56 2006/05/30 20:16:23 raeburn Exp $ +# $Id: lonwhatsnew.pm,v 1.57 2006/05/31 14:25:02 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -769,8 +769,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 +881,7 @@ sub check_thresholds { } } if ($warning) { - if ($$warningnum %2 == 1) { + if ($warningnum%2 == 1) { $rowColor = $rowColor1; } else { $rowColor = $rowColor2; @@ -912,8 +913,9 @@ sub check_thresholds { } } push(@{$warnings},$symb); - $$warningnum ++; + $warningnum ++; } + return $warningnum; }