[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() &&