--- loncom/homework/response.pm	2002/10/08 18:04:04	1.65
+++ loncom/homework/response.pm	2002/10/14 20:37:27	1.66
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # various response type definitons response definition
 #
-# $Id: response.pm,v 1.65 2002/10/08 18:04:04 bowersj2 Exp $
+# $Id: response.pm,v 1.66 2002/10/14 20:37:27 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -245,7 +245,7 @@ sub end_dataresponse {
       my ($symb,$courseid,$domain,$name)=&Apache::lonxml::whichuser();
       my $allowed=&Apache::lonnet::allowed('mgr',$courseid);
       if ($allowed) {
-	&Apache::response::setup_params('datasubmission');
+	&Apache::response::setup_params('dataresponse');
 	my $partid = $Apache::inputtags::part;
 	my $id = $Apache::inputtags::response['-1'];
 	my $response = $ENV{'form.HWVAL'.$id};
@@ -293,8 +293,8 @@ sub start_responseparam {
       $result = &Apache::edit::rebuild_tag($token);
       $result.=&Apache::edit::handle_insert();
     }
-  } elsif ($target eq 'grade' || $target eq 'answer' ||
-	   $target eq 'web'   || $target eq 'tex') {
+  } elsif ($target eq 'grade' || $target eq 'answer' || $target eq 'web' ||
+	   $target eq 'tex' || $target eq 'analyze' ) {
     if ($ENV{'request.state'} eq 'construct') {
       my $name    = &Apache::lonxml::get_param('name',$parstack,$safeeval);
       my $default = &Apache::lonxml::get_param('default',$parstack,$safeeval);