--- rat/lonpageflip.pm 2002/05/23 15:07:55 1.25 +++ rat/lonpageflip.pm 2002/07/07 21:04:47 1.26 @@ -2,7 +2,7 @@ # # Page flip handler # -# $Id: lonpageflip.pm,v 1.25 2002/05/23 15:07:55 www Exp $ +# $Id: lonpageflip.pm,v 1.26 2002/07/07 21:04:47 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -238,8 +238,9 @@ sub handler { ($next,$endupmap)=&move($rid,$startoutmap,$direction); # -------------------------------------- Do we have one and only one empty URL? my $safecount=0; - while (($next) && ($next!~/\,/) && (!$hash{'src_'.$next}) - && ($safecount<25)) { + while (($next) && ($next!~/\,/) && + ((!$hash{'src_'.$next}) || ($hash{'randomout_'.$next})) + && ($safecount<10000)) { ($next,$endupmap)=&move($next,$endupmap,$direction); $safecount++; } @@ -304,14 +305,14 @@ Please click on the the resource you int ENDSTART - map { + foreach (@possibilities) { $r->print( ''); - } @possibilities; + } $r->print('
TitleType
'. $multichoicehash{'title_'.$_}. ''.$multichoicehash{'type_'.$_}. '
'); return OK; } else {