--- loncom/homework/lonhomework.pm 2004/02/16 17:20:39 1.165 +++ loncom/homework/lonhomework.pm 2004/02/16 20:30:34 1.168 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # The LON-CAPA Homework handler # -# $Id: lonhomework.pm,v 1.165 2004/02/16 17:20:39 albertel Exp $ +# $Id: lonhomework.pm,v 1.168 2004/02/16 20:30:34 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -201,12 +201,16 @@ sub check_access { my $passed; if ($ENV{'request.state'} eq "construct") { - if (defined($ENV{'form.problemstatus'})) { + if ($ENV{'form.problemstate'}) { if ($ENV{'form.problemstate'} =~ /^CANNOT_ANSWER/) { - return ('CANNOT_ANSWER','is in this state by royal decree.'); + if ( ! ($ENV{'form.problemstate'} eq 'CANNOT_ANSWER_correct' && + lc($Apache::lonhomework::problemstatus) eq 'no')) { + return ('CANNOT_ANSWER', + &mt('is in this state by royal decree.')); + } } else { return ($ENV{'form.problemstate'}, - 'is in this state by royal decree.'); + &mt('is in this state by royal decree.')); } } &Apache::lonxml::debug("in construction ignoring dates");