--- loncom/homework/inputtags.pm	2002/10/02 18:13:47	1.64
+++ loncom/homework/inputtags.pm	2002/10/08 18:04:04	1.65
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # input  definitons
 #
-# $Id: inputtags.pm,v 1.64 2002/10/02 18:13:47 sakharuk Exp $
+# $Id: inputtags.pm,v 1.65 2002/10/08 18:04:04 bowersj2 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -32,7 +32,7 @@ use HTML::Entities();
 use strict;
 
 BEGIN {
-  &Apache::lonxml::register('Apache::inputtags',('textfield','textline','datasubmission'));
+  &Apache::lonxml::register('Apache::inputtags',('textfield','textline'));
 }
 
 
@@ -175,40 +175,6 @@ sub end_textline {
   return "";
 }
 
-sub start_datasubmission {
-  my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_;
-  my $id = &Apache::response::start_response($parstack,$safeeval);
-  my $result;
-  if ($target eq 'meta') {
-    $result = &Apache::response::meta_stores_write($token->[2]->{'name'},
-						   $token->[2]->{'type'},
-						   $token->[2]->{'display'});
-    $result .= &Apache::response::meta_package_write('datasubmission');
-  }
-  return $result;
-}
-
-sub end_datasubmission {
-  my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_;
-  my $result;
-  if ( $target eq 'web' ) {
-  } elsif ($target eq 'grade' ) {
-    if ( defined $ENV{'form.submitted'}) {
-      &Apache::response::setup_params('datasubmission');
-      my $partid = $Apache::inputtags::part;
-      my $id = $Apache::inputtags::response['-1'];
-      my $response = $ENV{'form.HWVAL'.$id};
-      my $name = &Apache::lonxml::get_param('name',$parstack,$safeeval);
-      if ( $response =~ /[^\s]/) {
-	$Apache::lonhomework::results{"resource.$partid.$id.$name"}=
-	  $response;
-      }
-    }
-  }
-  &Apache::response::end_response;
-  return $result;
-}
-
 sub finalizeawards {
   my $result='';
   my $award;