From 07c3b7b9a60ac7089eb7bc6bf3b3cd5b74be7d71 Mon Sep 17 00:00:00 2001 From: Michael Andreen Date: Mon, 21 Jul 2008 14:21:57 +0200 Subject: [PATCH 1/1] Fix, to give proper access denied page --- lib/NDWeb/Controller/CovOp.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lib/NDWeb/Controller/CovOp.pm b/lib/NDWeb/Controller/CovOp.pm index 68ef8a8..516e45d 100644 --- a/lib/NDWeb/Controller/CovOp.pm +++ b/lib/NDWeb/Controller/CovOp.pm @@ -25,12 +25,14 @@ sub index :Path :Args(0) { my ( $self, $c ) = @_; $c->stash( where => q{AND MaxResHack > 130000 ORDER BY minalert ASC,MaxResHack DESC}); + $c->forward('list'); } sub distwhores : Local { my ( $self, $c ) = @_; $c->stash( where => qq{AND distorters > 0 ORDER BY distorters DESC, minalert ASC}); + $c->forward('list'); } sub marktarget : Local { @@ -43,7 +45,7 @@ sub marktarget : Local { $c->res->redirect($c->req->referer); } -sub end : Private { +sub list : Private { my ( $self, $c ) = @_; my $dbh = $c->model; @@ -75,7 +77,6 @@ sub end : Private { $c->stash(targets => \@targets); $c->stash(template => 'covop/index.tt2'); - $c->forward('/end'); } =head1 AUTHOR -- 2.39.2