--- loncom/homework/caparesponse/caparesponse.pm 2001/08/09 15:35:47 1.41 +++ loncom/homework/caparesponse/caparesponse.pm 2001/08/13 21:44:24 1.42 @@ -171,7 +171,14 @@ sub end_numericalresponse { } sub start_stringresponse { - return start_numericalresponse(@_); + my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; + my $result; + if ($target eq 'meta') { + $result=&Apache::response::meta_package_write('stringresponse'); + } else { + $result.=&start_numericalresponse(@_); + } + return $result; } sub end_stringresponse {