loncom/homework/outputtags.pm - diff

Return to outputtags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.46, 2006/01/17 17:47:24	version 1.47, 2006/04/20 19:09:48
Line 73 sub start_displayduedate {	Line 73 sub start_displayduedate {
}	}
if (($status =~ /CAN.*_ANSWER/)) {	if (($status =~ /CAN.*_ANSWER/)) {
my $id = $Apache::inputtags::part;	my $id = $Apache::inputtags::part;
my $date = &Apache::lonnet::EXT("resource.$id.duedate");	my $date;
	my $interval= &Apache::lonnet::EXT("resource.$id.interval");
	if ($interval) {
	my $first_access=&Apache::lonnet::get_first_access('map');
	if ($first_access) { $date = $first_access+$interval; }
	}
	if (!defined($date)) {
	$date = &Apache::lonnet::EXT("resource.$id.duedate");
	}
&Apache::lonxml::debug("duedatebox found $date for $id");	&Apache::lonxml::debug("duedatebox found $date for $id");

# Only show the due date if the current date is	# Only show the due date if the current date is