diff options
| author | jeff <jeff> | 2008-06-28 19:25:24 +0000 |
|---|---|---|
| committer | jeff <jeff> | 2008-06-28 19:25:24 +0000 |
| commit | a1871d3d13c1dafa93b956762c0d23728d261da7 (patch) | |
| tree | ecd799ff28ca27d5e2ef07a615bcac49621dd391 /httemplate/edit/svc_acct_pop.cgi | |
| parent | 7588be4eb948426b972d0238dcdbb1537dc6a72a (diff) | |
agent virtualize address blocks and routers
Diffstat (limited to 'httemplate/edit/svc_acct_pop.cgi')
| -rwxr-xr-x | httemplate/edit/svc_acct_pop.cgi | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/httemplate/edit/svc_acct_pop.cgi b/httemplate/edit/svc_acct_pop.cgi index 3c16a1f95..b0ae1c381 100755 --- a/httemplate/edit/svc_acct_pop.cgi +++ b/httemplate/edit/svc_acct_pop.cgi @@ -27,8 +27,11 @@ Local <INPUT TYPE="text" NAME="loc" SIZE=5 MAXLENGTH=4 VALUE="<% $hashref->{ <%init> +my $curuser = $FS::CurrentUser::CurrentUser; + die "access denied" - unless $FS::CurrentUser::CurrentUser->access_right('Configuration'); + unless $curuser->access_right('Engineering configuration') + || $curuser->access_right('Engineering global configuration'); my $svc_acct_pop; if ( $cgi->param('error') ) { |