loncom/homework/imageresponse.pm - diff

Return to imageresponse.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.59, 2005/01/10 19:21:57	version 1.60, 2005/01/31 22:46:22
Line 270 sub gradefoils {	Line 270 sub gradefoils {
$temp++;	$temp++;
}	}
}	}
	my $responsestr="$x:$y";
	my $part=$Apache::inputtags::part;
	my $id = $Apache::inputtags::response['-1'];
	my %previous=&Apache::response::check_for_previous($responsestr,$part,$id);
if ($result	if ($result
&& $Apache::lonhomework::type eq 'survey') { $result='SUBMITTED'; }	&& $Apache::lonhomework::type eq 'survey') { $result='SUBMITTED'; }
$Apache::lonhomework::results{"resource.$Apache::inputtags::part.$id.submission"}="$x:$y";	&Apache::response::handle_previous(\%previous,$result);
$Apache::lonhomework::results{"resource.$Apache::inputtags::part.$id.awarddetail"}=$result;	$Apache::lonhomework::results{"resource.$part.$id.submission"}=$responsestr;
	$Apache::lonhomework::results{"resource.$part.$id.awarddetail"}=$result;
return '';	return '';
}	}