--- loncom/homework/essayresponse.pm	2002/08/01 19:16:45	1.14
+++ loncom/homework/essayresponse.pm	2002/08/07 16:23:05	1.15
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # essay (ungraded) style responses
 #
-# $Id: essayresponse.pm,v 1.14 2002/08/01 19:16:45 albertel Exp $
+# $Id: essayresponse.pm,v 1.15 2002/08/07 16:23:05 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -70,6 +70,7 @@ sub end_essayresponse {
     my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_;
     my $part          = $Apache::inputtags::part;
     my $id            = $Apache::inputtags::response[-1];
+    my $result;
     if ( $target eq 'grade' ) {
 	my $collaborators = $ENV{'form.HWCOL'.$part.'_'.$id};	
 	if ($collaborators =~ /[^\s]/) {
@@ -92,10 +93,12 @@ sub end_essayresponse {
 		&Apache::response::handle_previous(\%previous,$award);
 	    }
 	}
+    } elsif ($target eq 'edit') {
+	$result.=&Apache::edit::end_table();
     }
 
     &Apache::response::end_response;
-    return '';
+    return $result;
 }
 
 sub check_collaborators {