--- loncom/homework/grades.pm 2004/02/24 23:22:24 1.177 +++ loncom/homework/grades.pm 2004/02/25 00:31:57 1.178 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # The LON-CAPA Grading handler # -# $Id: grades.pm,v 1.177 2004/02/24 23:22:24 albertel Exp $ +# $Id: grades.pm,v 1.178 2004/02/25 00:31:57 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -531,7 +531,6 @@ sub verifyreceipt { if ($ENV{"course.$courseid.receiptalg"} eq 'receipt2') { $receiptparts=1; } my $parts=['0']; if ($receiptparts) { ($parts)=&response_type($url,$symb); } - $request->print("got Parts ".join(':',@$parts)); foreach (sort {lc($$fullname{$a}) cmp lc($$fullname{$b}) } keys %$fullname) { my ($uname,$udom)=split(/\:/); foreach my $part (@$parts) {