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

[raeburn]

raeburn		Thu Mar 10 23:13:52 2011 EDT

  Modified files:              
    /loncom/interface	lonnavmaps.pm 
  Log:
  - Bug 6439. BT pass/fail status from taskstatus. 
  
  
Index: loncom/interface/lonnavmaps.pm
diff -u loncom/interface/lonnavmaps.pm:1.456 loncom/interface/lonnavmaps.pm:1.457
--- loncom/interface/lonnavmaps.pm:1.456	Mon Jan 24 16:18:41 2011
+++ loncom/interface/lonnavmaps.pm	Thu Mar 10 23:13:52 2011
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Navigate Maps Handler
 #
-# $Id: lonnavmaps.pm,v 1.456 2011/01/24 16:18:41 www Exp $
+# $Id: lonnavmaps.pm,v 1.457 2011/03/10 23:13:52 raeburn Exp $
 
 #
 # Copyright Michigan State University Board of Trustees
@@ -4968,7 +4968,7 @@
                 my $taskstatus = $self->taskstatus();
                 $is_correct = (($taskstatus eq 'pass') || 
                                ($self->solved() =~ /^correct_/));
-                $got_grade = ($self->solved() =~ /^(?:pass|fail)$/);
+                $got_grade = ($taskstatus =~ /^(?:pass|fail)$/);
             } else {
                 $got_grade = 1;
                 $is_correct = ($self->solved() =~ /^correct_/);