--- loncom/homework/inputtags.pm 2002/10/28 19:19:19 1.70 +++ loncom/homework/inputtags.pm 2002/10/29 06:12:32 1.71 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # input definitons # -# $Id: inputtags.pm,v 1.70 2002/10/28 19:19:19 sakharuk Exp $ +# $Id: inputtags.pm,v 1.71 2002/10/29 06:12:32 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -308,7 +308,8 @@ sub decideoutput { sub setgradedata { my ($award,$id,$previously_used) = @_; # if the student already has it correct, don't modify the status - if ($Apache::inputtags::status['-1'] ne 'CAN_ANSWER') { + if ($Apache::inputtags::status['-1'] ne 'CAN_ANSWER' && + $Apache::inputtags::status['-1'] ne 'CANNOT_ANSWER') { $Apache::lonhomework::results{"resource.$id.afterduedate"}=$award; return ''; } elsif ( $Apache::lonhomework::history{"resource.$id.solved"} !~