table of contents
CatalystX::SimpleLogin::TraitFor::Controller::Login::WithRedirect(3pm) | User Contributed Perl Documentation | CatalystX::SimpleLogin::TraitFor::Controller::Login::WithRedirect(3pm) |
NAME¶
CatalystX::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 in order # to get the Does('NeedsLogin') functionality. BEGIN { extends 'Catalyst::Controller'; } 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¶
AUTHORS¶
See CatalystX::SimpleLogin for authors.
LICENSE¶
See CatalystX::SimpleLogin for license.
2022-08-28 | perl v5.34.0 |