diff options
-rw-r--r-- | FS/FS/Conf.pm | 14 | ||||
-rw-r--r-- | httemplate/edit/process/access_group.html | 12 |
2 files changed, 26 insertions, 0 deletions
diff --git a/FS/FS/Conf.pm b/FS/FS/Conf.pm index 2a1a037ce..3e88f979c 100644 --- a/FS/FS/Conf.pm +++ b/FS/FS/Conf.pm @@ -2261,6 +2261,20 @@ worry that config_items is freeside-specific and icky. 'type' => 'checkbox', }, + { + 'key' => 'disable_acl_changes', + 'section' => '', + 'description' => 'Disable all ACL changes, for demos.', + 'type' => 'checkbox', + }, + + { + 'key' => 'disable_acl_changes', + 'section' => '', + 'description' => 'Disable all ACL changes, for demos.', + 'type' => 'checkbox', + }, + ); 1; diff --git a/httemplate/edit/process/access_group.html b/httemplate/edit/process/access_group.html index c80311586..8b0df304a 100644 --- a/httemplate/edit/process/access_group.html +++ b/httemplate/edit/process/access_group.html @@ -1,3 +1,6 @@ +% if ( $conf->exists('disable_acl_changes') ) { + ACL changes disabled in public demo. +% } else { <% include( 'elements/process.html', 'table' => 'access_group', 'viewall_dir' => 'browse', @@ -13,3 +16,12 @@ }, ) %> +% } +<%init> + +die "access denied" + unless $FS::CurrentUser::CurrentUser->access_right('Configuration'); + +my $conf = new FS::Conf; + +</%init> |