Diff for /loncom/homework/grades.pm between versions 1.177 and 1.178

version 1.177, 2004/02/24 23:22:24 version 1.178, 2004/02/25 00:31:57
Line 531  sub verifyreceipt { Line 531  sub verifyreceipt {
     if ($ENV{"course.$courseid.receiptalg"} eq 'receipt2') { $receiptparts=1; }      if ($ENV{"course.$courseid.receiptalg"} eq 'receipt2') { $receiptparts=1; }
     my $parts=['0'];      my $parts=['0'];
     if ($receiptparts) { ($parts)=&response_type($url,$symb); }      if ($receiptparts) { ($parts)=&response_type($url,$symb); }
     $request->print("got Parts ".join(':',@$parts));  
     foreach (sort {lc($$fullname{$a}) cmp lc($$fullname{$b}) } keys %$fullname) {      foreach (sort {lc($$fullname{$a}) cmp lc($$fullname{$b}) } keys %$fullname) {
  my ($uname,$udom)=split(/\:/);   my ($uname,$udom)=split(/\:/);
  foreach my $part (@$parts) {   foreach my $part (@$parts) {

Removed from v.1.177  
changed lines
  Added in v.1.178


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>