X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fprocess%2Fsvc_acct_pop.cgi;h=6e823a82440dfac482ab1b51ea26ffad25388e0e;hb=d7759b49c2ff3b220ab328767645bfed85d18f31;hp=75b89c88f08ff3f3e9788aebe5a63c989531e5e7;hpb=5e05724a635a22776f1b973f5d7e77989da4e048;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');