[LON-CAPA-cvs] cvs: loncom /homework grades.pm

albertel lon-capa-cvs@mail.lon-capa.org
Fri, 07 Nov 2003 19:25:26 -0000


albertel		Fri Nov  7 14:25:26 2003 EDT

  Modified files:              
    /loncom/homework	grades.pm 
  Log:
  - remove some debugging code
  
  
Index: loncom/homework/grades.pm
diff -u loncom/homework/grades.pm:1.151 loncom/homework/grades.pm:1.152
--- loncom/homework/grades.pm:1.151	Fri Nov  7 14:23:56 2003
+++ loncom/homework/grades.pm	Fri Nov  7 14:25:26 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Grading handler
 #
-# $Id: grades.pm,v 1.151 2003/11/07 19:23:56 albertel Exp $
+# $Id: grades.pm,v 1.152 2003/11/07 19:25:26 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1806,7 +1806,6 @@
 							       $ENV{'form.msgsub'},$message);
 	    }
 	    if ($ENV{'form.collaborator'.$ctr}) {
-		&Apache::lonnet::logthis('collab '.(join(':',@{ $ENV{'form.collaborator'.$ctr} })));
 		my @collabstrs;
 		if (ref($ENV{'form.collaborator'.$ctr}) eq 'ARRAY') {
 		    @collabstrs=@{$ENV{'form.collaborator'.$ctr}};
@@ -1986,7 +1985,6 @@
     my %newrecord  = ();
     my ($pts,$wgt) = ('','');
     foreach (split(/:/,$ENV{'form.partlist'.$newflg})) {
-	&Apache::lonnet::logthis("-$submitter-$stuname-$part-$_");
 	#collaborator may vary for different parts
 	if ($submitter && $_ ne $part) { next; }
 	my $dropMenu = $ENV{'form.GD_SEL'.$newflg.'_'.$_};