--- loncom/homework/lonhomework.pm	2004/02/13 21:27:22	1.164
+++ loncom/homework/lonhomework.pm	2004/02/16 17:20:39	1.165
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Homework handler
 #
-# $Id: lonhomework.pm,v 1.164 2004/02/13 21:27:22 albertel Exp $
+# $Id: lonhomework.pm,v 1.165 2004/02/16 17:20:39 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -201,6 +201,14 @@ sub check_access {
     my $passed;
 
     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");
 	$status='CAN_ANSWER';
 	$datemsg=&mt('is in under construction');