|
version 1.89, 2005/12/20 18:09:49
|
version 1.90, 2005/12/21 18:08:28
|
|
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"}= |
![[BACK]](/icons/back.gif){kind=icon}
Return to bridgetask.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework