loncom/interface/lonwhatsnew.pm - diff

Return to lonwhatsnew.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.18, 2005/06/06 22:39:59	version 1.19, 2005/06/07 22:05:11
Line 561 sub getitems {	Line 561 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) = &Apache::grades::response_type($url,$symb);	my ($partlist,$handgrade,$responseType) =
	&Apache::grades::response_type($url,$symb);
	my $handgradeable;
	foreach my $value (values(%{$handgrade})) {
	if ($value eq 'yes') { $handgradeable=1; last; }
	}
	next if (!$handgradeable);

foreach my $student (keys(%$classlist)) {	foreach my $student (keys(%$classlist)) {
my ($uname,$udom) = split(/:/,$student);	my ($uname,$udom) = split(/:/,$student);
my %status=&Apache::grades::student_gradeStatus($url,$symb,$udom,$uname,$partlist);	my %status=&Apache::grades::student_gradeStatus($url,$symb,$udom,$uname,$partlist);