loncom/homework/lonhomework.pm - diff

Return to lonhomework.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.164, 2004/02/13 21:27:22	version 1.165, 2004/02/16 17:20:39
Line 201 sub check_access {	Line 201 sub check_access {
my $passed;	my $passed;

if ($ENV{'request.state'} eq "construct") {	if ($ENV{'request.state'} eq "construct") {
	if (defined($ENV{'form.problemstatus'})) {
	if ($ENV{'form.problemstate'} =~ /^CANNOT_ANSWER/) {
	return ('CANNOT_ANSWER','is in this state by royal decree.');
	} else {
	return ($ENV{'form.problemstate'},
	'is in this state by royal decree.');
	}
	}
&Apache::lonxml::debug("in construction ignoring dates");	&Apache::lonxml::debug("in construction ignoring dates");
$status='CAN_ANSWER';	$status='CAN_ANSWER';
$datemsg=&mt('is in under construction');	$datemsg=&mt('is in under construction');