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

albertel lon-capa-cvs@mail.lon-capa.org
Fri, 07 Oct 2005 17:57:40 -0000


albertel		Fri Oct  7 13:57:40 2005 EDT

  Modified files:              
    /loncom/interface	lonnavmaps.pm 
  Log:
  - BUG#3885 - not open, but has a grade, need to tell the student if they are right or wrong.
  
  
Index: loncom/interface/lonnavmaps.pm
diff -u loncom/interface/lonnavmaps.pm:1.342 loncom/interface/lonnavmaps.pm:1.343
--- loncom/interface/lonnavmaps.pm:1.342	Sat Oct  1 02:21:12 2005
+++ loncom/interface/lonnavmaps.pm	Fri Oct  7 13:57:39 2005
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Navigate Maps Handler
 #
-# $Id: lonnavmaps.pm,v 1.342 2005/10/01 06:21:12 albertel Exp $
+# $Id: lonnavmaps.pm,v 1.343 2005/10/07 17:57:39 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -4582,6 +4582,13 @@
 	return CORRECT; 
     }
 
+    # If it's WRONG... and not open
+    if ( ($completionStatus == INCORRECT || 
+	  $completionStatus == INCORRECT_BY_OVERRIDE)
+	 && (!$self->opendate($part) ||  $self->opendate($part) > time()) ) {
+	return INCORRECT;
+    }
+
     if ($completionStatus == ATTEMPTED) {
         return ATTEMPTED;
     }