--- loncom/auth/londatecheck.pm 2005/04/25 21:41:37 1.11 +++ loncom/auth/londatecheck.pm 2006/04/13 21:02:34 1.12 @@ -1,5 +1,5 @@ # Checks contentopen/close settings disable subsequent PerlHandlers if not open -# $Id: londatecheck.pm,v 1.11 2005/04/25 21:41:37 albertel Exp $ +# $Id: londatecheck.pm,v 1.12 2006/04/13 21:02:34 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -28,6 +28,7 @@ use strict; package Apache::londatecheck; use Apache::lonnet; use Apache::lonlocal; +use Apache::loncommon(); use Apache::Constants qw(:common :http :methods); sub content_date_check { @@ -60,12 +61,14 @@ sub handler { &Apache::loncommon::content_type($r,'text/html'); $r->send_http_header; return OK if $r->header_only; - my $html=&Apache::lonxml::xmlbegin(); - $r->print($html.'