version 1.10, 2001/07/27 18:20:16
|
version 1.11, 2001/07/30 22:21:20
|
Line 212 sub submission {
|
Line 212 sub submission {
|
if ($uname eq '') { &moreinfo($request,"Unable to find student"); return ''; } |
if ($uname eq '') { &moreinfo($request,"Unable to find student"); return ''; } |
my $symb=&Apache::lonnet::symbread($url); |
my $symb=&Apache::lonnet::symbread($url); |
if ($symb eq '') { $request->print("Unable to handle ambiguous references:$url:."); return ''; } |
if ($symb eq '') { $request->print("Unable to handle ambiguous references:$url:."); return ''; } |
my $home=&Apache::lonnet::homeserver($uname,$udom); |
my $answer=&Apache::loncommon::get_previous_attempt($symb,$uname,$udom, |
my $answer=&Apache::loncommon::get_previous_attempt($symb,$uname,$udom,$home, |
|
$ENV{'request.course.id'}); |
$ENV{'request.course.id'}); |
my $result="<h2> Submission Record </h2> $uname:$udom for $url".$answer; |
my $result="<h2> Submission Record </h2> $uname:$udom for $url <br />".$answer; |
return $result; |
return $result; |
} |
} |
|
|