loncom/interface/lonwhatsnew.pm - diff

Return to lonwhatsnew.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.56, 2006/05/30 20:16:23	version 1.58, 2006/06/03 21:05:04
Line 228 END	Line 228 END
</script>	</script>
';	';
}	}
return &Apache::loncommon::start_page(&mt('[_1] Action Items',	my $course_type=&Apache::loncommon::course_type();
$env{'course.'.$env{'request.course.id'}.'.type'}),$scripttag);	return &Apache::loncommon::start_page($course_type.' Action Items',
	$scripttag);
}	}

#-------------------------------	#-------------------------------
Line 769 sub getitems {	Line 770 sub getitems {

# Maxtries and degree of difficulty for problem parts, unless handgradeable	# Maxtries and degree of difficulty for problem parts, unless handgradeable
if ($$show{'abovethreshold'}) {	if ($$show{'abovethreshold'}) {
&check_thresholds($resource,$symb,\%resourcetracker,$triggered,	$warningnum = &check_thresholds($resource,$symb,\%resourcetracker,
$threshold,$warnings,$warningnum,$rowColor1,$rowColor2);	$triggered,$threshold,$warnings,
	$warningnum,$rowColor1,$rowColor2);
}	}

}	}
Line 880 sub check_thresholds {	Line 882 sub check_thresholds {
}	}
}	}
if ($warning) {	if ($warning) {
if ($$warningnum %2 == 1) {	if ($warningnum%2 == 1) {
$rowColor = $rowColor1;	$rowColor = $rowColor1;
} else {	} else {
$rowColor = $rowColor2;	$rowColor = $rowColor2;
Line 912 sub check_thresholds {	Line 914 sub check_thresholds {
}	}
}	}
push(@{$warnings},$symb);	push(@{$warnings},$symb);
$$warningnum ++;	$warningnum ++;
}	}
	return $warningnum;
}	}