loncom/xml/run.pm - diff

Return to run.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.37, 2003/06/09 21:37:54	version 1.38, 2003/06/09 21:45:23
Line 38 ENDEVALUATE	Line 38 ENDEVALUATE

sub evaluate {	sub evaluate {
my ($expression,$safeeval,$decls) = @_;	my ($expression,$safeeval,$decls) = @_;
&Apache::lonxml::debug("got $expression and decls $decls");
unless (defined($expression)) { return ''; }	unless (defined($expression)) { return ''; }
if ($Apache::lonxml::evaluate < 1) { return $expression; }	if ($Apache::lonxml::evaluate < 1) { return $expression; }
my $result = '';	my $result = '';