diff options
| -rw-r--r-- | FS/FS/AccessRight.pm | 6 | ||||
| -rw-r--r-- | FS/FS/access_right.pm | 3 | ||||
| -rw-r--r-- | httemplate/pref/pref.html | 3 |
3 files changed, 11 insertions, 1 deletions
diff --git a/FS/FS/AccessRight.pm b/FS/FS/AccessRight.pm index e97cc54cd..71db3f2ed 100644 --- a/FS/FS/AccessRight.pm +++ b/FS/FS/AccessRight.pm @@ -347,6 +347,12 @@ tie my %rights, 'Tie::IxHash', ### #'Database access rights' => [ { rightname=>'Raw SQL', global=>1 }, #NEW + #] + + #'Employee preference rights' => [ + { rightname=>'Employee preference telephony integration' }, + #] + ], ### 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', diff --git a/httemplate/pref/pref.html b/httemplate/pref/pref.html index 832df78c6..1b0ea0630 100644 --- a/httemplate/pref/pref.html +++ b/httemplate/pref/pref.html @@ -202,6 +202,8 @@ Development </TABLE> <BR> +% if ( $curuser->access_right('Employee preference telephony integration') ) { + SNOM integration <% ntable("#cccccc",2) %> @@ -246,6 +248,7 @@ Vonage integration (see <a href="https://secure.click2callu.com/">Click2Call</a> </TABLE> <BR> +% } % foreach my $prop (qw( height width availHeight availWidth colorDepth )) { <INPUT TYPE="hidden" NAME="<% $prop %>" VALUE=""> |