X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Faccess_right.pm;h=40475ec004b0d8dec802527d62dcb9c85acb19ec;hb=9fd03716b831bd00a725a63edbe19cfe6b88aea0;hp=7a4c4dad91d68599ceed33d401048458511c7926;hpb=ed98fabaf7bc3f2127ca33e465632312bd8815fc;p=freeside.git

diff --git a/FS/FS/access_right.pm b/FS/FS/access_right.pm
index 7a4c4dad9..40475ec00 100644
--- a/FS/FS/access_right.pm
+++ b/FS/FS/access_right.pm
@@ -297,6 +297,7 @@ sub _upgrade_data { # class method
 
     # grant to everyone
     for my $group (@all_groups) {
+      next if $group->access_right('Download report data');
       my $access_right = FS::access_right->new( {
           'righttype'   => 'FS::access_group',
           'rightobjnum' => $group->groupnum,