version 1.89, 2005/12/20 18:09:49
|
version 1.91, 2005/12/21 19:06:10
|
Line 81 sub proctor_check_auth {
|
Line 81 sub proctor_check_auth {
|
} |
} |
if ($authenticated && $type eq 'Task') { |
if ($authenticated && $type eq 'Task') { |
my $version= |
my $version= |
$Apache::lonhomework::results{'resource.0.version'}= |
$Apache::lonhomework::history{'resource.0.version'}; |
++$Apache::lonhomework::history{'resource.0.version'}; |
$version++; |
|
$Apache::lonhomework::results{'resource.0.version'}=$version; |
$Apache::lonhomework::results{"resource.$version.0.checkedin"}= |
$Apache::lonhomework::results{"resource.$version.0.checkedin"}= |
$user.'@'.$domain; |
$user.'@'.$domain; |
$Apache::lonhomework::results{"resource.$version.0.checkedin.slot"}= |
$Apache::lonhomework::results{"resource.$version.0.checkedin.slot"}= |
Line 94 sub proctor_check_auth {
|
Line 95 sub proctor_check_auth {
|
} |
} |
return 1; |
return 1; |
} elsif ($authenticated && $type eq 'problem') { |
} elsif ($authenticated && $type eq 'problem') { |
&Apache::lonxml::debug("authed #slot_name"); |
&Apache::lonxml::debug("authed $slot_name"); |
$Apache::lonhomework::results{"resource.0.checkedin"}= |
$Apache::lonhomework::results{"resource.0.checkedin"}= |
$user.'@'.$domain; |
$user.'@'.$domain; |
$Apache::lonhomework::results{"resource.0.checkedin.slot"}= |
$Apache::lonhomework::results{"resource.0.checkedin.slot"}= |
Line 1708 sub get_instance {
|
Line 1709 sub get_instance {
|
$Apache::lonhomework::results{"resource.$version.0.$dim.status"}= |
$Apache::lonhomework::results{"resource.$version.0.$dim.status"}= |
'fail'; |
'fail'; |
} else { |
} else { |
$Apache::lonhomework::results{"resource.$version.$dim.status"}= |
$Apache::lonhomework::results{"resource.$version.0.$dim.status"}= |
'pass'; |
'pass'; |
} |
} |
} else { |
} else { |