loncom/homework/structuretags.pm - diff

Return to structuretags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.291, 2005/04/29 21:22:33	version 1.293, 2005/06/04 02:56:44
Line 372 sub store_aggregates {	Line 372 sub store_aggregates {
}	}
if ($Apache::lonhomework::results{'resource.'.$part.'.tries'} == 1) {	if ($Apache::lonhomework::results{'resource.'.$part.'.tries'} == 1) {
$aggregate{$symb."\0".$part."\0users"} = 1;	$aggregate{$symb."\0".$part."\0users"} = 1;
	} else {
	my (undef,$last_reset) = &Apache::grades::get_last_resets($symb,$env{'request.course.id'},[$part]);
	if ($last_reset) {
	if (&Apache::grades::get_num_tries(\%Apache::lonhomework::history,$last_reset,$part) == 0) {
	$aggregate{$symb."\0".$part."\0users"} = 1;
	}
	}
}	}
$aggregate{$symb."\0".$part."\0attempts"} = 1;	$aggregate{$symb."\0".$part."\0attempts"} = 1;
}	}
if (%aggregate) {	if (keys (%aggregate) > 0) {
&Apache::lonnet::cinc('nohist_resourcetracker',\%aggregate,	&Apache::lonnet::cinc('nohist_resourcetracker',\%aggregate,
$cdomain,$cname);	$cdomain,$cname);

}	}
}	}