Catalyst Maintainable web apps made easy! #92
sub deleted :Chained('queue_setup') PathPart Args(0) {
    my ($self, $c) = @_;
    my $tasks_rs = $c->stash->{tasks_rs};

    # only let user see his own deleted tasks
    $c->detach('/not_found')
      if eval { $c->user->uid != $tasks_rs->first->owner->uid };

    $c->stash->{tasks}  = [$tasks_rs->deleted->all];
    $c->stash->{showing_deleted} = 1;
    $c->view->template('queue/show');
}

1;
Copyright © 2007 Jonathan Rockway