--- loncom/xml/run.pm 2001/05/04 21:17:24 1.16 +++ loncom/xml/run.pm 2001/05/21 03:28:24 1.17 @@ -37,7 +37,6 @@ sub evaluate { if (!$Apache::lonxml::evaluate) { return $expression; } my $result = ''; $@=''; - print $decls $safeeval->reval('{'.$decls.';$_=<<\'EXPRESSION\';'."\n".$expression. "\n".'EXPRESSION'."\n".$EVALUATE_STRING.'}'); # $safeeval->reval('{'.$decls.';<< &evaluate(q|'.$expression.'|);}');