--- loncom/xml/run.pm 2000/06/28 13:01:52 1.1 +++ loncom/xml/run.pm 2000/06/28 19:52:20 1.2 @@ -1,9 +1,14 @@ - sub evaluate { - my ($expression,$safeeval) = @_; - return $safeeval->reval($expression); - } +package Apache::run; - sub run { - my ($code,$safeeval) = @_; - $safeeval->reval($code); - } +sub evaluate { + my ($expression,$safeeval) = @_; + return $safeeval->reval($expression); +} + +sub run { + my ($code,$safeeval) = @_; + $safeeval->reval($code); +} + +1; +__END__;