loncom/auth/londatecheck.pm - diff

Return to londatecheck.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.7, 2004/08/23 19:34:00	version 1.8, 2005/04/07 06:56:21
Line 26	Line 26

use strict;	use strict;
package Apache::londatecheck;	package Apache::londatecheck;
use Apache::lonnet();	use Apache::lonnet;
use Apache::lonlocal;	use Apache::lonlocal;
use Apache::Constants qw(:common :http :methods);	use Apache::Constants qw(:common :http :methods);

sub content_date_check {	sub content_date_check {
my $symb=$ENV{'request.symb'};	my $symb=$env{'request.symb'};
my $open=&Apache::lonnet::EXT('resource.0.contentopen',$symb);	my $open=&Apache::lonnet::EXT('resource.0.contentopen',$symb);
my $close=&Apache::lonnet::EXT('resource.0.contentclose',$symb);	my $close=&Apache::lonnet::EXT('resource.0.contentclose',$symb);
if ( (defined($open) && $open ne '' && time < $open) ) {	if ( (defined($open) && $open ne '' && time < $open) ) {