X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fmisc%2Fqueue.cgi;h=5dee29b88741db78c2f3bca840f17ddf381cead0;hb=dfba562ff61f541ba7c75f2c02b32951b73aa002;hp=d8e910fb7483434e6554bf359b8b8190dceafb96;hpb=1e0dbd55775c7d9eba7db3d17a6173d03e3c2d0a;p=freeside.git

diff --git a/httemplate/misc/queue.cgi b/httemplate/misc/queue.cgi
index d8e910fb7..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). "search/queue.html");
-
-%>
+</%init>