X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fmisc%2Fqueue.cgi;h=5dee29b88741db78c2f3bca840f17ddf381cead0;hp=ce9c8fbd385e01fabb1301c396eb2fd40cda9beb;hb=11bbf29de447fe39e9d7155fe280a0df70fa8c3c;hpb=f7fd2a3e34da751cbc02bbf215e99c6dc89adc15 diff --git a/httemplate/misc/queue.cgi b/httemplate/misc/queue.cgi index ce9c8fbd3..5dee29b88 100644 --- a/httemplate/misc/queue.cgi +++ b/httemplate/misc/queue.cgi @@ -1,4 +1,8 @@ -<% +<% $cgi->redirect(popurl(2). "search/queue.html") %> +<%init> + +die "access denied" + unless $FS::CurrentUser::CurrentUser->access_right('Job queue'); $cgi->param('action') =~ /^(new|del|(retry|remove) selected)$/ or die "Illegal action"; @@ -42,6 +46,4 @@ if ( $action eq 'new' ) { } } -print $cgi->redirect(popurl(2). "browse/queue.cgi"); - -%> +