![]() |
![]()
| ![]() |
![]()
NAMECatalystX::SimpleLogin::TraitFor::Controller::Login::WithRedirect - redirect users who login back to the page they originally requested. SYNOPSISpackage 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' }); DESCRIPTIONProvides 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 METHODSredirect_after_login_uriMake 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 ALSOAUTHORSSee CatalystX::SimpleLogin for authors. LICENSESee CatalystX::SimpleLogin for license.
|