[LON-CAPA-cvs] cvs: loncom(version_1_0_2) /homework inputtags.pm

[albertel]

albertel		Wed Oct 15 18:20:13 2003 EDT

  Modified files:              (Branch: version_1_0_2)
    /loncom/homework	inputtags.pm 
  Log:
  - backport 1.121
  
  
Index: loncom/homework/inputtags.pm
diff -u loncom/homework/inputtags.pm:1.114.2.3 loncom/homework/inputtags.pm:1.114.2.4
--- loncom/homework/inputtags.pm:1.114.2.3	Tue Sep 23 12:00:49 2003
+++ loncom/homework/inputtags.pm	Wed Oct 15 18:20:13 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # input  definitons
 #
-# $Id: inputtags.pm,v 1.114.2.3 2003/09/23 16:00:49 albertel Exp $
+# $Id: inputtags.pm,v 1.114.2.4 2003/10/15 22:20:13 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -620,7 +620,8 @@
 
   my $status = $Apache::inputtags::status['-1'];
   &Apache::lonxml::debug("gradestatus has :$status:");
-  if ( $status ne 'CLOSED' && $status ne 'UNAVAILABLE') {  
+  if ( $status ne 'CLOSED' && $status ne 'UNAVAILABLE' &&
+       $status ne 'INVALID_ACCESS') {  
     my $award = $Apache::lonhomework::history{"resource.$id.award"};
     my $solved = $Apache::lonhomework::history{"resource.$id.solved"};
     my $previous = $Apache::lonhomework::history{"resource.$id.previous"};