Return to lonxml.pm CVS log | Up to [LON-CAPA] / loncom / xml |
version 1.526, 2011/12/06 16:30:19 | version 1.527, 2011/12/09 21:21:43 |
---|---|
Line 301 sub xmlparse { | Line 301 sub xmlparse { |
&clean_safespace($safeeval); | &clean_safespace($safeeval); |
if (@script_var_displays) { | if (@script_var_displays) { |
$finaloutput .= join('',@script_var_displays); | my $scriptoutput = join('',@script_var_displays); |
$finaloutput=~s{(</body>\s*</html>)\s*$}{$scriptoutput$1}s; | |
undef(@script_var_displays); | undef(@script_var_displays); |
} | } |
&init_state(); | &init_state(); |