loncom/publisher/lonpubdir.pm - diff

Return to lonpubdir.pm CVS log

Up to [LON-CAPA] / loncom / publisher

version 1.124, 2009/11/06 18:01:44	version 1.125, 2009/11/18 20:48:06
Line 201 sub startpage {	Line 201 sub startpage {
$formaction=~s\|/+\|/\|g;	$formaction=~s\|/+\|/\|g;
&Apache::lonhtmlcommon::store_recent('construct',$formaction,$formaction);	&Apache::lonhtmlcommon::store_recent('construct',$formaction,$formaction);

	&Apache::lonhtmlcommon::clear_breadcrumbs();
	&Apache::lonhtmlcommon::add_breadcrumb({
	'text' => 'Construction Space',
	'href' => &Apache::loncommon::authorspace(),
	});
	# breadcrumbs (and tools) will be created
	# in start_page->bodytag->innerregister

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('Construction Space',undef));	$r->print(&Apache::loncommon::start_page('Construction Space',undef));
Line 209 sub startpage {	Line 217 sub startpage {
{ 'only_body' => 1,}));	{ 'only_body' => 1,}));
}	}

# Breadcrumbs
&Apache::lonhtmlcommon::clear_breadcrumbs();
&Apache::lonhtmlcommon::add_breadcrumb({
'text' => 'Construction Space',
'href' => &Apache::loncommon::authorspace(),
});

$r->print(&Apache::lonhtmlcommon::breadcrumbs());

$r->print(&Apache::loncommon::head_subbox(	$r->print(&Apache::loncommon::head_subbox(
&Apache::loncommon::CSTR_pageheader(1)));	&Apache::loncommon::CSTR_pageheader(1)));