diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2015-05-04 16:28:58 -0700 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2015-05-04 16:28:58 -0700 |
| commit | 86637503b5608164cf31aea501f131c74e27b724 (patch) | |
| tree | d16e1afc23f58dcf827d38894e05f601b0123270 /FS/FS/access_right.pm | |
| parent | 38cd4a53e99e0583de526262b31a8b93debca4c7 (diff) | |
add an ACL to control snom/vonage/etc. employee telephony integration, RT#34839
Diffstat (limited to 'FS/FS/access_right.pm')
| -rw-r--r-- | FS/FS/access_right.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/FS/FS/access_right.pm b/FS/FS/access_right.pm index b44c21c33..6de16f608 100644 --- a/FS/FS/access_right.pm +++ b/FS/FS/access_right.pm @@ -251,6 +251,7 @@ sub _upgrade_data { # class method 'Void credit' => 'Void credit', 'Unvoid credit' => 'Unvoid credit', 'Add on-the-fly void credit reason' => 'Add on-the-fly void credit reason', + '_ALL' => 'Employee preference telephony integration', ); # foreach my $old_acl ( keys %onetime ) { @@ -271,7 +272,7 @@ sub _upgrade_data { # class method # grant $new_acl to all groups who have $old_acl for my $group (@all_groups) { - next unless $group->access_right($old_acl); + next unless $old_acl eq '_ALL' || $group->access_right($old_acl); next if $group->access_right($new_acl); my $access_right = FS::access_right->new( { 'righttype' => 'FS::access_group', |