loncom/homework/bridgetask.pm - diff

Return to bridgetask.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.163, 2006/06/09 22:31:36	version 1.164, 2006/06/09 23:09:01
Line 614 DONESCREEN	Line 614 DONESCREEN
$result.='<b>'.&mt("Stopped grading.").'</b>'.$back;	$result.='<b>'.&mt("Stopped grading.").'</b>'.$back;
} elsif ($status_code eq 'cancel') {	} elsif ($status_code eq 'cancel') {
$result.='<b>'.&mt("Cancelled grading.").'</b>'.$back;	$result.='<b>'.&mt("Cancelled grading.").'</b>'.$back;
	} elsif ($status_code eq 'never_versioned') {
	$result.='<b>'.
	&mt("Requested user has never accessed the task.").
	'</b>'.$back;
} elsif ($status_code eq 'lock_failed') {	} elsif ($status_code eq 'lock_failed') {
$result.='<b>'.&mt("Failed to lock the requested record.")	$result.='<b>'.&mt("Failed to lock the requested record.")
.'</b>'.$back;	.'</b>'.$back;
Line 726 sub get_key_todo {	Line 730 sub get_key_todo {
if (!$queue) {	if (!$queue) {
$env{'form.queue'} = $queue = 'none';	$env{'form.queue'} = $queue = 'none';
#not queued so doing either a re or pre grade	#not queued so doing either a re or pre grade
#FIXME don't allow pregrade	my %status = &Apache::lonnet::restore($symb,$cid,$udom,$uname);
&Apache::lonxml::debug("not in queue no lock");	if ($status{'resource.0.version'} < 1) {
	return (undef,'never_versioned');
	}
return ($gradingkey);	return ($gradingkey);
}	}