--- loncom/xml/run.pm 2000/11/15 15:29:33 1.11 +++ loncom/xml/run.pm 2000/11/16 14:20:05 1.12 @@ -42,6 +42,7 @@ sub evaluate { # $safeeval->reval('{'.$decls.';<< &evaluate(q|'.$expression.'|);}'); if ($@ eq '') { $result = $safeeval->reval('return $_;'); + chop $result; } else { &Apache::lonxml::error("substitution on:$expression:with:$decls:caused $@"); }