X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fprocess%2Fsvc_acct_pop.cgi;h=6e823a82440dfac482ab1b51ea26ffad25388e0e;hb=1fc8addc56f8daf12397da568eb1ac1b27fd3984;hp=75b89c88f08ff3f3e9788aebe5a63c989531e5e7;hpb=c648976f0b7975f2328ebd7ba8c711fad0ca4195;p=freeside.git diff --git a/httemplate/edit/process/svc_acct_pop.cgi b/httemplate/edit/process/svc_acct_pop.cgi index 75b89c88f..6e823a824 100755 --- a/httemplate/edit/process/svc_acct_pop.cgi +++ b/httemplate/edit/process/svc_acct_pop.cgi @@ -6,8 +6,11 @@ %} <%init> +my $curuser = $FS::CurrentUser::CurrentUser; + die "access denied" - unless $FS::CurrentUser::CurrentUser->access_right('Configuration'); + unless $curuser->access_right('Dialup configuration') + || $curuser->access_right('Dialup global configuration'); my $popnum = $cgi->param('popnum');