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}); |