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

raeburn lon-capa-cvs-allow@mail.lon-capa.org
Sun, 17 Aug 2008 23:25:44 -0000


raeburn		Sun Aug 17 19:25:44 2008 EDT

  Modified files:              
    /loncom/interface	lonquickgrades.pm 
  Log:
  Bug 5705.
  - Stop bleeding status information to quickgrades if problemstatus set to 'no_feedback_ever'. 
  
  
Index: loncom/interface/lonquickgrades.pm
diff -u loncom/interface/lonquickgrades.pm:1.41 loncom/interface/lonquickgrades.pm:1.42
--- loncom/interface/lonquickgrades.pm:1.41	Thu Dec 20 05:18:19 2007
+++ loncom/interface/lonquickgrades.pm	Sun Aug 17 19:25:40 2008
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Quick Student Grades Display
 #
-# $Id: lonquickgrades.pm,v 1.41 2007/12/20 10:18:19 bisitz Exp $
+# $Id: lonquickgrades.pm,v 1.42 2008/08/17 23:25:40 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -145,7 +145,8 @@
 		    my $score = 0;
 		    # If we're not telling status and the answer date isn't passed yet, 
 		    # it's an "attempted" point
-		    if ($curRes->problemstatus($part) eq 'no' &&
+		    if ((($curRes->problemstatus($part) eq 'no') ||
+                        ($curRes->problemstatus($part) eq 'no_feedback_ever')) &&
 			($dateStatus != $curRes->ANSWER_OPEN)) {
 			my $status = $curRes->simpleStatus($part);
 			if ($status == $curRes->ATTEMPTED) {