loncom/interface/lonwhatsnew.pm - diff

Return to lonwhatsnew.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.24, 2005/07/14 21:30:25	version 1.25, 2005/07/15 05:30:06
Line 564 sub getitems {	Line 564 sub getitems {
if ($resource->is_problem()) {	if ($resource->is_problem()) {
my $ctr = 0;	my $ctr = 0;
my ($map,$ind,$url)=&Apache::lonnet::decode_symb($symb);	my ($map,$ind,$url)=&Apache::lonnet::decode_symb($symb);
my ($partlist,$handgrade,$responseType) =	my $partlist=$resource->parts();
&Apache::grades::response_type($url,$symb);
my $handgradeable;	my $handgradeable;
foreach my $value (values(%{$handgrade})) {	foreach my $part (@$partlist) {
if ($value eq 'yes') { $handgradeable=1; last; }	if ($resource->handgrade($part) eq 'yes') {
	$handgradeable=1; last;
	}
}	}
if ($handgradeable) {	if ($handgradeable) {
foreach my $student (keys(%$classlist)) {	foreach my $student (keys(%$classlist)) {