loncom/homework/bridgetask.pm - diff

Return to bridgetask.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.175, 2006/06/20 03:38:58	version 1.176, 2006/06/20 03:56:30
Line 83 sub proctor_check_auth {	Line 83 sub proctor_check_auth {
}	}
}	}
if ($authenticated) {	if ($authenticated) {
my $useslots = &Apache::lonnet::EXT("resource.0.useslots");	&check_in($type,$user,$domain,$slot_name);
if ( $useslots eq 'map_map') {
&checkin_resource($user,$domain,$slot_name);
} else {
&create_new_version($type,$user,$domain,$slot_name);
}
return 1;	return 1;
}	}
}	}
Line 601 sub start_Task {	Line 596 sub start_Task {
if ($status eq 'CAN_ANSWER' && $version eq '') {	if ($status eq 'CAN_ANSWER' && $version eq '') {
# CAN_ANSWR mode, and no current version, unproctored access	# CAN_ANSWR mode, and no current version, unproctored access
# thus self-checkedin	# thus self-checkedin
&check_in('Task',undef,undef,$slot_name);	&check_in('Task',undef,undef,$slot_name)
&add_to_queue('gradingqueue',{'type' => 'Task',	&add_to_queue('gradingqueue',{'type' => 'Task',
'time' => time,	'time' => time,
'slot' => $slot_name});	'slot' => $slot_name});