Diff for /loncom/homework/grades.pm between versions 1.574.2.5 and 1.574.2.6

version 1.574.2.5, 2009/12/27 01:51:07 version 1.574.2.6, 2009/12/27 02:05:40
Line 9050  ENDHEADER Line 9050  ENDHEADER
           my $sum=0;            my $sum=0;
           my $realnumber=$number;            my $realnumber=$number;
           for (my $i=0;$i<$number;$i++) {            for (my $i=0;$i<$number;$i++) {
              if ($answer[$i]) {               if  ($correct[$i] eq '-') {
                   $realnumber--;
                } elsif ($answer[$i]) {
                 if ($gradingmechanism eq 'attendance') {                  if ($gradingmechanism eq 'attendance') {
                    $sum+=$pcorrect;                     $sum+=$pcorrect;
                 } elsif ($answer[$i] eq '*') {                  } elsif ($correct[$i] eq '*') {
                    $sum+=$pcorrect;                     $sum+=$pcorrect;
                 } elsif ($answer[$i] eq '-') {  
                    $realnumber--;  
                 } else {                  } else {
                    if ($answer[$i] eq $correct[$i]) {                     if ($answer[$i] eq $correct[$i]) {
                       $sum+=$pcorrect;                        $sum+=$pcorrect;

Removed from v.1.574.2.5  
changed lines
  Added in v.1.574.2.6


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