loncom/homework/structuretags.pm - diff

Return to structuretags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.162, 2003/04/03 20:05:21	version 1.163, 2003/04/03 21:08:33
Line 319 sub start_problem {	Line 319 sub start_problem {
#handle rand seed in construction space	#handle rand seed in construction space
my $rndseed=&setup_rndseed($safeeval);	my $rndseed=&setup_rndseed($safeeval);
my ($symb)=&Apache::lonxml::whichuser();	my ($symb)=&Apache::lonxml::whichuser();
if ($ENV{'request.state'} ne "construct" \|\| $symb eq '') {	if ($ENV{'request.state'} ne "construct" && $symb eq '') {
$form_tag_start.='<input type="hidden" name="rndseed" value="'.	$form_tag_start.='<input type="hidden" name="rndseed" value="'.
$rndseed.'" />'.	$rndseed.'" />'.
'<input type="submit" name="resetdata"	'<input type="submit" name="resetdata"