loncom/xml/run.pm - diff

Return to run.pm CVS log

Up to [LON-CAPA] / loncom / xml

-version 1.59, 2008/09/11 14:47:24
+version 1.61, 2012/12/18 18:27:43
  Line 168  sub dump {
  		    $line.='$'.$symname.'='.$safeeval->reval('$'.$symname)."\n";
  		}
  	    }
- 	    if ($safeeval->reval('defined(@'.$symname.')')) {
+ 	    if ($safeeval->reval('@'.$symname)) {
  		$line.='@'.$symname.'=('.
  		    $safeeval->reval('join(",",@'.$symname.')').")"."\n";
  	    }
- 	    if ($safeeval->reval('defined(%'.$symname.')')) {
+ 	    if ($safeeval->reval('%'.$symname)) {
  		$line.='%'.$symname.'=(';
  		$line.=$safeeval->reval('join(",",map { $_."=>".$'.
  					$symname.'{$_} } sort keys %'.
  Line 191  sub dump {
 ;
  __END__;
+ =pod
+ =head1 NAME
+ Apache::run.pm
+ =head1 SYNOPSIS
+ Used to prevent poorly written problems from
+ causing lingering after effects
+ This is part of the LearningOnline Network with CAPA project
+ described at http://www.lon-capa.org.
+ =head1 NOTABLE SUBROUTINES
+ =over
+ =item run(), dump(), evaluate()
+ =back
+ =cut