ebl fix acl

git-svn-id: https://bacula.svn.sourceforge.net/svnroot/bacula/trunk@6168 91ce42f0-d328-0410-95d8-f526ca767f89

diff --git a/gui/bweb/lib/Bweb.pm b/gui/bweb/lib/Bweb.pm
index 251bf8c58e155c5849432da4073f205957f299a4..fdee9cd06afe3d1d6ac4ee7b2bda1d768eba5767 100644 (file)
--- a/gui/bweb/lib/Bweb.pm
+++ b/gui/bweb/lib/Bweb.pm
@@ -2802,7 +2802,9 @@ sub groups_edit
        return;
     }
 
-    $self->cant_do('r_group_mgnt') or $self->can_do('r_view_group');
+    unless ($self->cant_do('r_group_mgnt')) {
+       $self->can_do('r_view_group');
+    }
 
     my $query = "
 SELECT Name AS name