loncom/homework/outputtags.pm - diff

Return to outputtags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.1, 2001/01/11 15:20:58	version 1.2, 2001/01/11 16:11:16
Line 5 use Apache::lonnet;	Line 5 use Apache::lonnet;
use POSIX qw(strftime);	use POSIX qw(strftime);

sub BEGIN {	sub BEGIN {
&Apache::lonxml::register('Apache::outputtags',('duedatebox'));	&Apache::lonxml::register('Apache::outputtags',('displayduedate','displaytitle'));
}	}

	sub start_displayduedate {
sub start_duedatebox {
my ($target,$token,$parstack,$parser,$safeeval)=@_;	my ($target,$token,$parstack,$parser,$safeeval)=@_;
my $result;	my $result;
my $status=$Apache::inputtags::status['-1'];	my $status=$Apache::inputtags::status['-1'];
Line 32 sub start_duedatebox {	Line 31 sub start_duedatebox {
return $result;	return $result;
}	}

sub end_duedatebox {	sub end_displayduedate {
	}

	sub start_displaytitle {
	my ($target,$token,$parstack,$parser,$safeeval)=@_;
	return "<h1>$Apache::lonhomework::name</h1>";
	}

	sub end_displaytitle {
}	}

1;	1;