--- loncom/homework/caparesponse/caparesponse.pm 2005/08/02 19:01:18 1.177 +++ loncom/homework/caparesponse/caparesponse.pm 2005/08/17 16:37:11 1.178 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # caparesponse definition # -# $Id: caparesponse.pm,v 1.177 2005/08/02 19:01:18 albertel Exp $ +# $Id: caparesponse.pm,v 1.178 2005/08/17 16:37:11 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -761,6 +761,10 @@ sub end_stringresponse { # foreach my $ans (@answers) { if ($target eq 'answer') { $result.=&Apache::response::answer_part('stringresponse',$answer); + if ($type eq 're') { + $result.=&Apache::response::answer_part('stringresponse', + $answerdisplay); + } } elsif ($target eq 'analyze') { push (@{ $Apache::lonhomework::analyze{"$part.$id.answer"} }, $answer);