[LON-CAPA-cvs] cvs: rat / lonpageflip.pm

[albertel]

albertel		Mon Oct 18 18:24:01 2004 EDT

  Modified files:              
    /rat	lonpageflip.pm 
  Log:
  - if the user is adv they should be allowed to step through hidden resources.
  
  
Index: rat/lonpageflip.pm
diff -u rat/lonpageflip.pm:1.47 rat/lonpageflip.pm:1.48
--- rat/lonpageflip.pm:1.47	Thu Apr  8 05:14:41 2004
+++ rat/lonpageflip.pm	Mon Oct 18 18:24:00 2004
@@ -2,7 +2,7 @@
 #
 # Page flip handler
 #
-# $Id: lonpageflip.pm,v 1.47 2004/04/08 09:14:41 raeburn Exp $
+# $Id: lonpageflip.pm,v 1.48 2004/10/18 22:24:00 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -268,7 +268,8 @@
 # -------------------------------------- Do we have one and only one empty URL?
               my $safecount=0;
               while (($next) && ($next!~/\,/) && 
-                     ((!$hash{'src_'.$next}) || ($hash{'randomout_'.$next}))
+                     ((!$hash{'src_'.$next}) || 
+		      ($ENV{'request.role.adv'}) && $hash{'randomout_'.$next}))
                      && ($safecount<10000)) {
                   ($next,$endupmap)=&move($next,$endupmap,$direction);
                   $safecount++;