loncom/xml/londefdef.pm - diff

Return to londefdef.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.450, 2013/10/14 17:11:18	version 1.452, 2014/06/17 23:22:17
Line 585 sub start_body {	Line 585 sub start_body {
# FIXME Where are we?	# FIXME Where are we?
}	}

	my $args = {'add_entries' => $token->[2],
	'force_register' => 1,};
	if ($target eq 'web') {
	$args->{'print_suppress'} = 1;
	if ($env{'request.use_absolute'}) {
	$args->{'use_absolute'} = $env{'request.use_absolute'};
	}
	}
$currentstring =	$currentstring =
&Apache::loncommon::start_page($Apache::londefdef::title,	&Apache::loncommon::start_page($Apache::londefdef::title,
$Apache::londefdef::head	$Apache::londefdef::head
.$extra_head,	.$extra_head,$args);
{'add_entries' => $token->[2],
# 'no_title' => 1,
'force_register' => 1});

my $header = '';	my $header = '';
if ($env{'request.state'} ne 'published' &&	if ($env{'request.state'} ne 'published' &&
$env{'request.state'} ne 'construct') {	$env{'request.state'} ne 'construct') {