[LON-CAPA-cvs] cvs: loncom /interface lonquickgrades.pm

[albertel]

albertel		Tue Dec 20 10:02:14 2005 EDT

  Modified files:              
    /loncom/interface	lonquickgrades.pm 
  Log:
  - need to support partially correct in external/spreadsheet graindg modeas as being 'done'
  
  
Index: loncom/interface/lonquickgrades.pm
diff -u loncom/interface/lonquickgrades.pm:1.36 loncom/interface/lonquickgrades.pm:1.37
--- loncom/interface/lonquickgrades.pm:1.36	Thu Apr  7 02:56:23 2005
+++ loncom/interface/lonquickgrades.pm	Tue Dec 20 10:02:13 2005
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Quick Student Grades Display
 #
-# $Id: lonquickgrades.pm,v 1.36 2005/04/07 06:56:23 albertel Exp $
+# $Id: lonquickgrades.pm,v 1.37 2005/12/20 15:02:13 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -171,7 +171,8 @@
 		    my $status = $curRes->simpleStatus($part);
 		    my $thisright = 0;
 		    $partsCount++;
-		    if ($status == $curRes->CORRECT ) {
+		    if ($status == $curRes->CORRECT ||
+			$status == $curRes->PARTIALLY_CORRECT ) {
 			$partsRight++;
 			$totalRight++;
 			$thisright = 1;