![[BACK]](/icons/back.gif){kind=icon}
Return to response.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework|
Return to response.pm CVS log | Up to [LON-CAPA] / loncom / homework |
| version 1.223, 2011/06/06 17:17:38 | version 1.224, 2011/06/06 17:43:51 |
|---|---|
| Line 179 sub setrandomnumber { | Line 179 sub setrandomnumber { |
| } else { | } else { |
| ($rndmod,$rndmod2)=&Apache::lonnet::digest("$id1,$id2"); | ($rndmod,$rndmod2)=&Apache::lonnet::digest("$id1,$id2"); |
| } | } |
| $Apache::lonhomework::results{'resource.'.$id1.'.rawrndseed'}=$rndseed; | |
| if ($rndseed =~/([,:])/) { | if ($rndseed =~/([,:])/) { |
| my $char=$1; | my $char=$1; |
| use integer; | use integer; |