CatalystX:CatalystX::SimpleLogin::TraitFor::Controller::Login::WithRedirect(3)NAMECatalystX::SimpleLogin::TraitFor::Controller::Login::WithRedirect-
redirect users who login back to the page they originally requested.
SYNOPSIS
package MyApp::Controller::NeedsAuth;
use Moose;
use namespace::autoclean;
# One needs to inherit from Catalyst::Controller::ActionRole in order
# to get the Does('NeedsLogin') functionality.
BEGIN { extends 'Catalyst::Controller::ActionRole'; }
sub inbox : Path Does('NeedsLogin') {
# Redirects to /login if not logged in
my ($self, $c) = @_;
$c->stash->{template} = "inbox.tt2";
return;
}
# Turn on in config
MyApp->config('Contoller::Login' => { traits => 'WithRedirect' });
DESCRIPTION
Provides the "login" action with a wrapper to redirect to a page which
needs authentication, from which the user was previously redirected.
Goes hand in hand with Catalyst::ActionRole::NeedsLogin
WRAPPED METHODS
redirect_after_login_uri
Make it use and extract "$c->session->{redirect_to_after_login}" if it
exists.
METHODS
$controller->login_redirect($c, $message)
This sets the error message to $message and sets
"$c->session->{redirect_to_after_login}" to the current URL.
SEE ALSO
CatalystX::SimpleLogin::Controller::Login
CatalystX::SimpleLogin::Form::Login
AUTHORS
See CatalystX::SimpleLogin for authors.
LICENSE
See CatalystX::SimpleLogin for license.
perl v5.14CatalystX::SimpleLogin::TraitFor::Controller::Login::WithRedirect(3)