--- loncom/homework/essayresponse.pm 2004/12/14 20:12:30 1.54 +++ loncom/homework/essayresponse.pm 2004/12/16 21:21:35 1.56 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # essay (ungraded) style responses # -# $Id: essayresponse.pm,v 1.54 2004/12/14 20:12:30 banghart Exp $ +# $Id: essayresponse.pm,v 1.56 2004/12/16 21:21:35 banghart Exp $ # # Copyright Michigan State University Board of Trustees # @@ -67,9 +67,7 @@ sub start_essayresponse { if ($uploadedfiletypes) { $result.=''.&mt('Submit a file: (only one file can be uploaded)'). '

'. - $part.'_'.$id.'" '. + $part.'_'.$id.'" />
'. &mt('Allowed filetypes: [_1]',$uploadedfiletypes).'
'. 'OR:
Select Portfolio Files'. '
'. @@ -117,7 +115,6 @@ sub end_essayresponse { my $response = $ENV{'form.HWVAL_'.$id}; my $filename= $ENV{'form.HWFILE'.$part.'_'.$id.'.filename'}; my $portfiles = $ENV{'form.HWPORT'.$part.'_'.$id}; - &Apache::lonnet::logthis("portfiles now $portfiles"); if (( $response =~ /[^\s]/) || ($filename =~ /[^\s]/) || ($portfiles =~ /[^\s]/)) { my $award; if ($ENV{'form.HWDRAFT'.$part.'_'.$id} eq 'yes') {