loncom/homework/structuretags.pm - diff

Return to structuretags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.220, 2003/11/01 16:37:21	version 1.221, 2003/11/03 21:47:21
Line 171 sub setup_rndseed {	Line 171 sub setup_rndseed {
if (defined($rndseed) && $rndseed ne int($rndseed)) {	if (defined($rndseed) && $rndseed ne int($rndseed)) {
$rndseed=join(',',&Math::Random::random_seed_from_phrase($rndseed));	$rndseed=join(',',&Math::Random::random_seed_from_phrase($rndseed));
}	}
&Apache::lonxml::debug("Setting rndseed to $rndseed");	if ($safeeval) {
&Apache::run::run('$external::randomseed='.$rndseed.';',$safeeval);	&Apache::lonxml::debug("Setting rndseed to $rndseed");
	&Apache::run::run('$external::randomseed='.$rndseed.';',$safeeval);
	}
}	}
return $rndseed;	return $rndseed;
}	}