--- rat/lonsequence.pm 2003/09/22 03:02:06 1.16 +++ rat/lonsequence.pm 2004/05/21 20:16:40 1.17 @@ -2,7 +2,7 @@ # # Sequence Handler # -# $Id: lonsequence.pm,v 1.16 2003/09/22 03:02:06 www Exp $ +# $Id: lonsequence.pm,v 1.17 2004/05/21 20:16:40 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -263,6 +263,7 @@ sub handler { if (tie(%bighash,'GDBM_File',$ENV{'request.course.fn'}.'.db', &GDBM_READER(),0640)) { my $disid=''; + my $randomout =''; if ($direction eq 'back') { $disid=$bighash{'map_finish_'.$requrl}; @@ -272,9 +273,10 @@ sub handler { if ($disid) { $disurl=$bighash{'src_'.$disid}; $dismapid=(split(/\./,$disid))[1]; + $randomout = $bighash{'randomout_'.$disid}; } -# ------------------------- If this is an empty one, skip to next non-empty one - if ((!$disurl) && ($disid)) { +# ----------- If this is an empty one, or hidden, skip to next non-empty or non-hidden one + if ( ((!$disurl) && ($disid)) || ($randomout && $disid) ) { $direction=($direction?$direction:'forward'); ($disid,$requrl)= &Apache::lonpageflip::fullmove($disid,