loncom/xml/run.pm - diff

Return to run.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.27, 2002/05/03 22:30:54	version 1.28, 2002/05/23 21:12:44
Line 62 sub run {	Line 62 sub run {
my ($code,$safeeval,$hideerrors) = @_;	my ($code,$safeeval,$hideerrors) = @_;
# print "inside run\n";	# print "inside run\n";
$@='';	$@='';
	$Apache::lonxml::request->hard_timeout("Apache::run::run, evaluation $code");
my (@result)=$safeeval->reval($code);	my (@result)=$safeeval->reval($code);
	$Apache::lonxml::request->kill_timeout;
my $error=$@;	my $error=$@;
if ($error ne '' && !$hideerrors) {	if ($error ne '' && !$hideerrors) {
&Apache::lonxml::error('<pre>'.&HTML::Entities::encode($error).	&Apache::lonxml::error('<pre>'.&HTML::Entities::encode($error).