--- loncom/lonmap.pm 2011/10/07 12:01:51 1.4 +++ loncom/lonmap.pm 2011/10/21 10:10:07 1.5 @@ -2,7 +2,7 @@ # # Read maps into a 'big hash'. # -# $Id: lonmap.pm,v 1.4 2011/10/07 12:01:51 foxr Exp $ +# $Id: lonmap.pm,v 1.5 2011/10/21 10:10:07 foxr Exp $ # # Copyright Michigan State University Board of Trustees # @@ -403,7 +403,6 @@ sub hiddenurls { my (undef,$id)=split(/\./,$rid); if ($randompickseed{$rid}) { $id=$randompickseed{$rid}; } my $rndseed=&Apache::lonnet::rndseed($id, $courseid, $udom, $uname, \%cenv); # use id instead of symb - &Apache::lonnet::logthis("lonmap random seed: $rndseed"); &Apache::lonnet::setup_random_from_rndseed($rndseed); my @whichids=&Math::Random::random_permuted_index($#currentrids+1); for (my $i=1;$i<=$rndpick;$i++) { $currentrids[$whichids[$i]]=''; }