loncom/publisher/lonconstruct.pm - diff

Return to lonconstruct.pm CVS log

Up to [LON-CAPA] / loncom / publisher

version 1.23, 2004/10/29 18:40:40	version 1.28, 2005/02/17 09:01:04
Line 40 package Apache::lonconstruct;	Line 40 package Apache::lonconstruct;


use strict;	use strict;
use Apache::Constants qw(:common :http :methods REDIRECT);	use Apache::Constants qw(:common :http :methods);
use Apache::lonnet;	use Apache::lonnet;
use Apache::Log ();	use Apache::Log ();
use HTML::Entities();	use HTML::Entities();
Line 92 sub handler {	Line 92 sub handler {

# -------------------------------------------------------------- Build frameset	# -------------------------------------------------------------- Build frameset

$r->content_type('text/html');	&Apache::loncommon::content_type($r,'text/html');
$r->send_http_header;	$r->send_http_header;
return OK if $r->header_only;	return OK if $r->header_only;

Line 123 sub handler {	Line 123 sub handler {
#	#
my $toprows = 0;	my $toprows = 0;
my $topsrc = '';	my $topsrc = '';
if ($ENV{'environment.remote'} eq 'on') {	if ($ENV{'environment.remote'} ne 'off') {
$toprows = '110';	$toprows = '110';
$topsrc = '/adm/localize/adm/publisher.html';	$topsrc = '/adm/localize/adm/publisher.html';
}	}