loncom/interface/loncommon.pm - diff

Return to loncommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.315, 2006/03/21 16:32:50	version 1.316, 2006/03/21 18:32:19
Line 3119 sub end_page {	Line 3119 sub end_page {

sub validate_page {	sub validate_page {
if ( exists($env{'internal.start_page'})	if ( exists($env{'internal.start_page'})
&& $env{'internal.start_page'} > 1) {	&& $env{'internal.start_page'} > 1) {
&Apache::lonnet::logthis('start_page called multiple times');	&Apache::lonnet::logthis('start_page called multiple times '.
	$ENV{'request.filename'});
}	}
if ( exists($env{'internal.end_page'})	if ( exists($env{'internal.end_page'})
&& $env{'internal.end_page'} > 1) {	&& $env{'internal.end_page'} > 1) {
&Apache::lonnet::logthis('end_page called multiple times');	&Apache::lonnet::logthis('end_page called multiple times '.
	$env{'request.filename'});
}	}
if ( exists($env{'internal.start_page'})	if ( exists($env{'internal.start_page'})
&& ! exists($env{'internal.end_page'})) {	&& ! exists($env{'internal.end_page'})) {
&Apache::lonnet::logthis('start_page called without end_page');	&Apache::lonnet::logthis('start_page called without end_page '.
	$env{'request.filename'});
}	}
if ( ! exists($env{'internal.start_page'})	if ( ! exists($env{'internal.start_page'})
&& exists($env{'internal.end_page'})) {	&& exists($env{'internal.end_page'})) {
&Apache::lonnet::logthis('end_page called without start_page');	&Apache::lonnet::logthis('end_page called without start_page'.
	$env{'request.filename'});
}	}
}	}