--- loncom/homework/inputtags.pm	2002/06/24 21:23:26	1.57
+++ loncom/homework/inputtags.pm	2002/07/25 20:55:13	1.58
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # input  definitons
 #
-# $Id: inputtags.pm,v 1.57 2002/06/24 21:23:26 albertel Exp $
+# $Id: inputtags.pm,v 1.58 2002/07/25 20:55:13 ng Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -346,9 +346,10 @@ sub setgradedata {
       delete($Apache::lonhomework::results{"resource.$id.tries"});
       $Apache::lonhomework::results{"resource.$id.previous"} = '1';
     } elsif ( $previously_used eq 'PREVIOUSLY_LAST') {
-      #delete all data as they student didn't do anything
+      #delete all data as they student didn't do anything, but save
+      #the list of collaborators.
       foreach my $key (keys(%Apache::lonhomework::results)) {
-	if ($key =~ /^resource\.$id\./) {
+	if (($key =~ /^resource\.$id\./) && ($key !~ /\.collaborators$/)) {
 	  &Apache::lonxml::debug("Removing $key");
 	  delete($Apache::lonhomework::results{$key});
 	}