loncom/publisher/lonpubdir.pm - diff

Return to lonpubdir.pm CVS log

Up to [LON-CAPA] / loncom / publisher

version 1.107, 2008/01/16 18:15:15	version 1.108, 2008/01/17 04:50:57
Line 207 sub startpage {	Line 207 sub startpage {
&Apache::lonhtmlcommon::store_recent('construct',$formaction,$formaction);	&Apache::lonhtmlcommon::store_recent('construct',$formaction,$formaction);
if ($env{'environment.remote'} eq 'off') {	if ($env{'environment.remote'} eq 'off') {
$env{'request.noversionuri'}=$currdir.'/';	$env{'request.noversionuri'}=$currdir.'/';
$r->print(&Apache::loncommon::start_page(&mt('Construction Space'),undef,	$r->print(&Apache::loncommon::start_page('Construction Space',undef,
{'body_title' =>	{'body_title' =>
$pagetitle,}));	$pagetitle,}));
} else {	} else {
$r->print(&Apache::loncommon::start_page(&mt('Construction Space'),undef,	$r->print(&Apache::loncommon::start_page('Construction Space',undef,
{ 'only_body' => 1,}));	{ 'only_body' => 1,}));
$r->print($pagetitle);	$r->print($pagetitle);
}	}

my $esc_thisdisfn = &Apache::loncommon::escape_single($thisdisfn);	my $esc_thisdisfn = &Apache::loncommon::escape_single($thisdisfn);
my $doctitle=&mt('LON-CAPA Construction Space');	my $doctitle = 'LON-CAPA '.&mt('Construction Space');
my $pubdirscript=(<<ENDPUBDIRSCRIPT);	my $pubdirscript=(<<ENDPUBDIRSCRIPT);
<script type="text/javascript">	<script type="text/javascript">
top.document.title = '$esc_thisdisfn/ - $doctitle';	top.document.title = '$esc_thisdisfn/ - $doctitle';