[Catalyst] Re: Detach won't detach?

[Jonathan Rockway]

* On Mon, Jan 26 2009, Aristotle Pagaltzis wrote:
>     sub auto :Private {
>       my ( $self, $c ) = @_;
>
>       return 1 if user_logged_in;
>
>       $c->redirect( $c->req->base );
>       return 0;
>     }

If we are playing golf, I submit:

    sub auto :Private {
        my $c = pop;
        return user_logged_in || $c->redirect( ... ) || 0;
    }

Now I have that much more disk space free for pr0n!

Regards,
Jonathan Rockway

--
print just => another => perl => hacker => if $,=$"