--- loncom/interface/spreadsheet/assesscalc.pm 2003/09/17 17:32:56 1.23 +++ loncom/interface/spreadsheet/assesscalc.pm 2003/09/22 21:03:25 1.24 @@ -1,5 +1,5 @@ # -# $Id: assesscalc.pm,v 1.23 2003/09/17 17:32:56 albertel Exp $ +# $Id: assesscalc.pm,v 1.24 2003/09/22 21:03:25 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -689,7 +689,7 @@ sub compute { while (my ($parm,$value) = each(%parameters)) { last if ($self->blackout()); next if ($parm !~ /^(parameter_.*)_problemstatus$/); - if ($parameters{$1.'_answerdate'} eq '' || + if ($parameters{$1.'_answerdate'} ne '' && $parameters{$1.'_answerdate'} < time) { next; }