From: Michael Andreen Date: Mon, 21 Jul 2008 12:21:57 +0000 (+0200) Subject: Fix, to give proper access denied page X-Git-Url: https://ruin.nu/git/?a=commitdiff_plain;h=07c3b7b9a60ac7089eb7bc6bf3b3cd5b74be7d71;p=ndwebbie.git Fix, to give proper access denied page --- 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