version 1.49, 2003/07/05 10:07:11
|
version 1.50, 2003/08/06 17:00:30
|
Line 567 sub handler {
|
Line 567 sub handler {
|
# Get output from resource |
# Get output from resource |
my $usersaw=&resource_output($feedurl); |
my $usersaw=&resource_output($feedurl); |
|
|
# Get resource answer |
# Get resource answer (need to allow student to view grades for this to work) |
|
&Apache::lonnet::appenv(('allowed.vgr'=>'F')); |
my $useranswer=&Apache::loncommon::get_student_answers( |
my $useranswer=&Apache::loncommon::get_student_answers( |
$symb,$ENV{'user.name'},$ENV{'user.domain'}, |
$symb,$ENV{'user.name'},$ENV{'user.domain'}, |
$ENV{'request.course.id'}); |
$ENV{'request.course.id'}); |
|
&Apache::lonnet::delenv('allowed.vgr'); |
# Get attachments, if any, and not too large |
# Get attachments, if any, and not too large |
my $attachmenturl=''; |
my $attachmenturl=''; |
if ($ENV{'form.attachment.filename'}) { |
if ($ENV{'form.attachment.filename'}) { |