loncom/homework/bridgetask.pm - diff

Return to bridgetask.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.259, 2012/04/11 11:40:00	version 1.261, 2012/12/18 16:57:23
Line 719 sub start_Task {	Line 719 sub start_Task {
'slot' => $slot_name});	'slot' => $slot_name});
($version,$previous)=&get_version();	($version,$previous)=&get_version();
}	}
	if (($target eq 'web') && ($version ne '') && ($slot_name ne '')) {
	if (ref($slot) eq 'HASH') {
	if ($slot->{'endtime'} > time()) {
	$result .=
	&Apache::lonhtmlcommon::set_due_date($slot->{'endtime'});
	}
	}
	}

my $status_id = 'LC_task_take';	my $status_id = 'LC_task_take';
if ($previous && $target eq 'answer') {	if ($previous && $target eq 'answer') {
$status_id = 'LC_task_answer';	$status_id = 'LC_task_answer';
Line 988 sub get_key_todo {	Line 996 sub get_key_todo {
my $classlist=&get_limited_classlist();	my $classlist=&get_limited_classlist();
if (!&allow_grade_user($classlist->{$uname.':'.$udom})) {	if (!&allow_grade_user($classlist->{$uname.':'.$udom})) {
return (undef,'not_allowed',	return (undef,'not_allowed',
&mt('Requested student ([_1]) is in a section you aren\'t allowed to grade.',$uname.':'.$udom));	&mt("Requested student ([_1]) is in a section you aren't allowed to grade.",$uname.':'.$udom));
}	}
}	}
my $gradingkey=&encode_queue_key($symb,$udom,$uname);	my $gradingkey=&encode_queue_key($symb,$udom,$uname);