version 1.104, 2010/04/19 04:20:25
|
version 1.105, 2010/04/20 23:59:53
|
Line 41 BEGIN {
|
Line 41 BEGIN {
|
sub start_essayresponse { |
sub start_essayresponse { |
my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; |
my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; |
my $result; |
my $result; |
print STDERR "target is $target AND status is ".$Apache::inputtags::status[-1]." AND ". |
|
" type is ".$Apache::lonhomework::type."\n"; |
|
my $id = &Apache::response::start_response($parstack,$safeeval); |
my $id = &Apache::response::start_response($parstack,$safeeval); |
if ($target eq 'meta') { |
if ($target eq 'meta') { |
$result=&Apache::response::meta_package_write('essayresponse'); |
$result=&Apache::response::meta_package_write('essayresponse'); |