[LON-CAPA-cvs] cvs: loncom /interface lonnavmaps.pm

[bowersj2]

bowersj2		Thu Feb  6 16:26:21 2003 EDT

  Modified files:              
    /loncom/interface	lonnavmaps.pm 
  Log:
  Correct browse priviledge check.
  
  
Index: loncom/interface/lonnavmaps.pm
diff -u loncom/interface/lonnavmaps.pm:1.137 loncom/interface/lonnavmaps.pm:1.138
--- loncom/interface/lonnavmaps.pm:1.137	Thu Feb  6 16:16:19 2003
+++ loncom/interface/lonnavmaps.pm	Thu Feb  6 16:26:21 2003
@@ -2,7 +2,7 @@
 # The LearningOnline Network with CAPA
 # Navigate Maps Handler
 #
-# $Id: lonnavmaps.pm,v 1.137 2003/02/06 21:16:19 bowersj2 Exp $
+# $Id: lonnavmaps.pm,v 1.138 2003/02/06 21:26:21 bowersj2 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2228,7 +2228,9 @@
     # If this is a blank resource, don't actually return it.
     # Should you ever find you need it, make sure to add an option to the code
     #  that you can use; other things depend on this behavior.
-    if (!$self->{HERE}->src() || !$self->{HERE}->browsePriv()) {
+    my $browsePriv = $self->{HERE}->browsePriv();
+    if (!$self->{HERE}->src() || 
+        (!($browsePriv eq 'F') && !($browsePriv eq '2')) ) {
         return $self->next();
     }