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

raeburn lon-capa-cvs-allow@mail.lon-capa.org
Thu, 10 Jan 2008 16:49:58 -0000


raeburn		Thu Jan 10 11:49:58 2008 EDT

  Modified files:              
    /loncom/interface	lonnavmaps.pm 
  Log:
  Don't leak correctness and tries used to student's NAVMAP display when show_status is set to "no_feedback_ever"  
  
  
Index: loncom/interface/lonnavmaps.pm
diff -u loncom/interface/lonnavmaps.pm:1.407 loncom/interface/lonnavmaps.pm:1.408
--- loncom/interface/lonnavmaps.pm:1.407	Thu Jan  3 17:49:56 2008
+++ loncom/interface/lonnavmaps.pm	Thu Jan 10 11:49:58 2008
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Navigate Maps Handler
 #
-# $Id: lonnavmaps.pm,v 1.407 2008/01/03 22:49:56 raeburn Exp $
+# $Id: lonnavmaps.pm,v 1.408 2008/01/10 16:49:58 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -4567,7 +4567,11 @@
     #if ($self->{RESOURCE_ERROR}) { return NETWORK_FAILURE; }
     if ($completionStatus == NETWORK_FAILURE) { return NETWORK_FAILURE; }
 
-    my $suppressFeedback = $self->problemstatus($part) eq 'no';
+    my $suppressFeedback = 0;
+    if (($self->problemstatus($part) eq 'no') ||
+        ($self->problemstatus($part) eq 'no_feedback_ever')) {
+        $suppressFeedback = 1;
+    }
     # If there's an answer date and we're past it, don't
     # suppress the feedback; student should know
     if ($self->duedate($part) && $self->duedate($part) < time() &&