version 1.424, 2006/11/01 23:24:51
|
version 1.425, 2006/11/10 19:41:34
|
Line 342 sub xmlparse {
|
Line 342 sub xmlparse {
|
my $finaloutput = &inner_xmlparse($target,\@stack,\@parstack,\@pars, |
my $finaloutput = &inner_xmlparse($target,\@stack,\@parstack,\@pars, |
$safeeval,\%style_for_target,1); |
$safeeval,\%style_for_target,1); |
|
|
|
if (@stack) { |
|
&warning("At end of file some tags were still left unclosed, ". |
|
'<tt><'.join('></tt>, <tt><',reverse(@stack)). |
|
'></tt>'); |
|
} |
if ($env{'request.uri'}) { |
if ($env{'request.uri'}) { |
&writeallows($env{'request.uri'}); |
&writeallows($env{'request.uri'}); |
} |
} |