[LON-CAPA-cvs] cvs: loncom /auth londatecheck.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Mon, 28 Jun 2004 16:26:55 -0000
albertel Mon Jun 28 12:26:55 2004 EDT
Modified files:
/loncom/auth londatecheck.pm
Log:
- BUG#3133
Index: loncom/auth/londatecheck.pm
diff -u loncom/auth/londatecheck.pm:1.2 loncom/auth/londatecheck.pm:1.3
--- loncom/auth/londatecheck.pm:1.2 Tue Jun 1 10:40:59 2004
+++ loncom/auth/londatecheck.pm Mon Jun 28 12:26:55 2004
@@ -1,5 +1,5 @@
# Checks contentopen/close settings disable subsequent PerlHandlers if not open
-# $Id: londatecheck.pm,v 1.2 2004/06/01 14:40:59 albertel Exp $
+# $Id: londatecheck.pm,v 1.3 2004/06/28 16:26:55 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -32,11 +32,9 @@
sub content_date_check {
my $symb=$ENV{'request.symb'};
my $open=&Apache::lonnet::EXT('resource.0.contentopen',$symb);
- &Apache::lonnet::logthis("Hrrm got an open of $open");
my $close=&Apache::lonnet::EXT('resource.0.contentclose',$symb);
if ( (defined($open) && $open ne '' && time < $open) ||
(defined($close) && $close ne '' && time > $close)) {
- &Apache::lonnet::logthis(" returning CLOSED ");
return ('CLOSED',$open,$close);
}
return ('OPEN',$open,$close);