loncom/homework/lonhomework.pm - diff

Return to lonhomework.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.21, 2000/12/15 20:31:30	version 1.24, 2000/12/21 18:13:33
Line 10 use Apache::lonnet;	Line 10 use Apache::lonnet;
use Apache::inputtags;	use Apache::inputtags;
use Apache::structuretags;	use Apache::structuretags;
use Apache::response;	use Apache::response;
	use Apache::hint;

sub get_target {	sub get_target {
if ( $ENV{'request.state'} eq "published") {	if ( $ENV{'request.state'} eq "published") {
Line 88 sub check_date {	Line 88 sub check_date {
$datemsg = "is due at $date";	$datemsg = "is due at $date";
} elsif ($type eq 'answerdate') {	} elsif ($type eq 'answerdate') {
$status='CLOSED';	$status='CLOSED';
$datemsg = "was due as $lastdate, and asnswers will be available at $date";	$datemsg = "was due as $lastdate, and answers will be available at $date";
}	}
&Apache::lonxml::debug("sending back :$status:$datemsg:");	&Apache::lonxml::debug("sending back :$status:$datemsg:");
	if ($ENV{'request.state'} eq "construct") {
	&Apache::lonxml::debug("in construction ignoring dates");
	$status='CAN_ANSWER';
	$datemsg='is in under construction';
	}
return ($status,$datemsg);	return ($status,$datemsg);
}	}