loncom/xml/londefdef.pm - diff

Return to londefdef.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.406, 2009/05/26 14:06:23	version 1.408, 2009/05/28 12:39:12
Line 557 sub start_body {	Line 557 sub start_body {
# 'no_title' => 1,	# 'no_title' => 1,
'force_register' => 1});	'force_register' => 1});

$currentstring .= &Apache::lonhtmlcommon::breadcrumbs()	$currentstring .= &Apache::lonhtmlcommon::breadcrumbs();
.&Apache::loncommon::head_subbox(
&Apache::loncommon::CSTR_pageheader());

if ($env{'request.state'} ne 'published') {	my $header = '';
$currentstring.=&Apache::lonmenu::constspaceform();	if ($env{'request.state'} ne 'published') {
$currentstring.=&Apache::londefdef::edit_controls();	$header=&Apache::lonmenu::constspaceform()
}	.&Apache::londefdef::edit_controls();
$currentstring.=&Apache::lonxml::message_location();	}
	$currentstring.=&Apache::loncommon::head_subbox(
	&Apache::loncommon::CSTR_pageheader()
	.$header);
	$currentstring.=&Apache::lonxml::message_location();
} elsif ($target eq 'tex') {	} elsif ($target eq 'tex') {
$currentstring = ''; # '\begin{document}' is in header.	$currentstring = ''; # '\begin{document}' is in header.
}	}

return $currentstring;	return $currentstring;
}	}

Line 585 sub edit_controls {	Line 588 sub edit_controls {
</div>';	</div>';
}	}
$result .= '	$result .= '
<div class="LC_edit_problem_header_edit_row"><input type="submit" name="editmode" accesskey="e" value="'.&mt('Edit').'" /></div></div>	<div><input type="submit" name="editmode" accesskey="e" value="'.&mt('Edit').'" /></div>
	</div>
</form>	</form>
<br />';	';
return $result;	return $result;
}	}