--- loncom/homework/essayresponse.pm 2001/04/05 00:07:53 1.2 +++ loncom/homework/essayresponse.pm 2001/08/13 21:44:24 1.4 @@ -9,13 +9,17 @@ sub BEGIN { } sub start_essayresponse { - my ($target,$token,$parstack,$parser,$safeeval,$style)=@_; + my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; + my $result; my $id = &Apache::response::start_response($parstack,$safeeval); - return ''; + if ($target eq 'meta') { + $result=&Apache::response::meta_package_write('essayresponse'); + } + return $result; } sub end_essayresponse { - my ($target,$token,$parstack,$parser,$safeeval,$style)=@_; + my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; if ( $target eq 'grade' ) { if ( defined $ENV{'form.submitted'}) { my $id = $Apache::inputtags::response['-1'];