--- loncom/homework/structuretags.pm 2015/02/22 01:34:48 1.528 +++ loncom/homework/structuretags.pm 2015/02/22 15:23:57 1.529 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.528 2015/02/22 01:34:48 raeburn Exp $ +# $Id: structuretags.pm,v 1.529 2015/02/22 15:23:57 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1677,14 +1677,14 @@ sub start_problem { my $rndseed=&setup_rndseed($safeeval,$target,$probpartlist); if (($target eq 'grade') && &Apache::response::submitted()) { if ($Apache::lonhomework::type eq 'randomizetry') { - $Apache::lonhomework::results{'resource.0.rawrndseed'}=$rndseed; + $Apache::lonhomework::results{'resource.0.rndseed'}=$rndseed; } else { my @parts; if (ref($probpartlist) eq 'ARRAY') { @parts = @{$probpartlist}; } unless (@parts) { - $Apache::lonhomework::results{'resource.0.rawrndseed'}=$Apache::lonhomework::rawrndseed; + $Apache::lonhomework::results{'resource.0.rndseed'}=$Apache::lonhomework::rawrndseed; } } } @@ -2747,10 +2747,10 @@ sub start_part { if ($Apache::lonhomework::type eq 'randomizetry') { my $rndseed=&setup_rndseed($safeeval,$target); if (($target eq 'grade') && &Apache::response::submitted()) { - $Apache::lonhomework::results{"resource.$id.rawrndseed"}=$rndseed; + $Apache::lonhomework::results{"resource.$id.rndseed"}=$rndseed; } } elsif (($target eq 'grade') && &Apache::response::submitted()) { - $Apache::lonhomework::results{"resource.$id.rawrndseed"}=$Apache::lonhomework::rawrndseed; + $Apache::lonhomework::results{"resource.$id.rndseed"}=$Apache::lonhomework::rawrndseed; } my $in_order_show=&ordered_show_check(); my $expression='$external::part=\''.$Apache::inputtags::part.'\';';