loncom/xml/scripttag.pm - diff

Return to scripttag.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.110, 2004/02/24 21:12:48	version 1.111, 2004/04/12 23:01:57
Line 482 sub end_comment {	Line 482 sub end_comment {

sub xmlparse {	sub xmlparse {
my ($string) = @_;	my ($string) = @_;
# &Apache::lonxml::debug("Got $string");	&Apache::lonxml::debug("xmlparse recursion starting with $string");
	if ($string eq '&xmlparse') { return '&xmlparse'; }
my ($target,$token,$tagstack,$parstack,$oldparser,$safeeval,$style)=	my ($target,$token,$tagstack,$parstack,$oldparser,$safeeval,$style)=
@Apache::scripttag::parser_env;	@Apache::scripttag::parser_env;
my @parser;	my @parser;
Line 490 sub xmlparse {	Line 491 sub xmlparse {
my $result=&Apache::lonxml::inner_xmlparse($target,$tagstack,	my $result=&Apache::lonxml::inner_xmlparse($target,$tagstack,
$parstack,\@parser,	$parstack,\@parser,
$safeeval,$style);	$safeeval,$style);
	&Apache::lonxml::debug("xmlparse recursion ending with $result");
return $result;	return $result;
}	}