X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fmisc%2Fqueue.cgi;h=5dee29b88741db78c2f3bca840f17ddf381cead0;hp=8c1e5362d2e5d70f7a4751677d8e1cd73a05f932;hb=11bbf29de447fe39e9d7155fe280a0df70fa8c3c;hpb=f70985da9714a8a2c5dd87f56d891ed0197ef590 diff --git a/httemplate/misc/queue.cgi b/httemplate/misc/queue.cgi index 8c1e5362d..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"; @@ -9,7 +13,8 @@ if ( $action eq 'new' || $action eq 'del' ) { $cgi->param('jobnum') =~ /^(\d+)$/ or die "Illegal jobnum"; my $jobnum = $1; $job = qsearchs('queue', { 'jobnum' => $1 }) - or die "unknown jobnum $jobnum"; + or die "unknown jobnum $jobnum - ". + "it probably completed normally or was removed by another user"; } if ( $action eq 'new' ) { @@ -41,6 +46,4 @@ if ( $action eq 'new' ) { } } -print $cgi->redirect(popurl(2). "browse/queue.cgi"); - -%> +