loncom/homework/structuretags.pm - diff

Return to structuretags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.487, 2011/02/06 18:43:10	version 1.488, 2011/06/06 17:43:51
Line 411 sub setup_rndseed {	Line 411 sub setup_rndseed {
delete($env{'form.resetdata'});	delete($env{'form.resetdata'});
delete($env{'form.newrandomization'});	delete($env{'form.newrandomization'});
}	}
if (defined($rndseed) && $rndseed ne int($rndseed)) {	$rndseed=~s/\,/\:/g;
	$rndseed=~s/[^\w\d\:\-]//g;
	if ((defined($rndseed)) && ($rndseed!~/^[\d\-]+\:[\d\-]+/)) {
$rndseed=join(':',&Apache::lonnet::digest($rndseed));	$rndseed=join(':',&Apache::lonnet::digest($rndseed));
}	}
if ($Apache::lonhomework::history{'resource.CODE'}) {	if ($Apache::lonhomework::history{'resource.CODE'}) {
Line 642 $show_all	Line 644 $show_all
<div class="LC_edit_problem_header_randomize_row">	<div class="LC_edit_problem_header_randomize_row">
<input type="submit" name="newrandomization" accesskey="a" value="'.&mt('New Randomization').'" />	<input type="submit" name="newrandomization" accesskey="a" value="'.&mt('New Randomization').'" />
<input type="submit" name="changerandseed" value="'.&mt('Change Random Seed To:').'" />	<input type="submit" name="changerandseed" value="'.&mt('Change Random Seed To:').'" />
<input type="text" name="rndseed" size="10" value="'.	<input type="text" name="rndseed" size="24" value="'.
$rndseed.'"	$rndseed.'"
onchange="javascript:document.lonhomework.changerandseed.click()" />';	onchange="javascript:document.lonhomework.changerandseed.click()" />';