loncom/xml/lonxml.pm - diff

Return to lonxml.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.66, 2001/03/29 20:47:06	version 1.67, 2001/03/30 01:42:23
Line 171 sub xmlparse {	Line 171 sub xmlparse {
# if ($target eq 'meta') {	# if ($target eq 'meta') {
# $finaloutput.=&endredirection;	# $finaloutput.=&endredirection;
# }	# }

	if (($ENV{'QUERY_STRING'}) && ($target eq 'web')) {
	$finaloutput=&afterburn($finaloutput);
	}

return $finaloutput;	return $finaloutput;
}	}


sub recurse {	sub recurse {

my @innerstack = ();	my @innerstack = ();
Line 492 sub handler {	Line 498 sub handler {
} else {	} else {
$result = &Apache::lonxml::xmlparse($target,$filecontents,'',%mystyle);	$result = &Apache::lonxml::xmlparse($target,$filecontents,'',%mystyle);
}	}
#
# Afterburner
#
if ($ENV{'QUERY_STRING'}) {
$result=&afterburn($result);
}
$request->print($result);


if ($target eq 'tex') {	if ($target eq 'tex') {
# $request->print('\end{document}'."\n");	# $request->print('\end{document}'."\n");
Line 508 sub handler {	Line 506 sub handler {
$request->print(&Apache::lontexconvert::footer());	$request->print(&Apache::lontexconvert::footer());
}	}

	$request->print($result);

writeallows($request->uri);	writeallows($request->uri);
return OK;	return OK;
}	}