--- loncom/xml/run.pm 2003/06/09 21:37:54 1.37
+++ loncom/xml/run.pm 2003/06/18 21:04:42 1.39
@@ -1,6 +1,6 @@
package Apache::run;
#
-# $Id: run.pm,v 1.37 2003/06/09 21:37:54 albertel Exp $
+# $Id: run.pm,v 1.39 2003/06/18 21:04:42 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -38,7 +38,6 @@ ENDEVALUATE
sub evaluate {
my ($expression,$safeeval,$decls) = @_;
- &Apache::lonxml::debug("got $expression and decls $decls");
unless (defined($expression)) { return ''; }
if ($Apache::lonxml::evaluate < 1) { return $expression; }
my $result = '';
@@ -131,7 +130,7 @@ sub dump {
$symname.'{$_} } sort keys %'.
$symname.')').")"
}
- if ($line ne '') { $dump.=&HTML::Entities::encode($line)."
\n"; }
+ if ($line ne '') { $dump.=&HTML::Entities::encode($line)."
"; }
}
}
$dump.='';