CatalystX::SimpleLogin::TraitFor::Controller::Login::WithRedirect - redirect users who login back to the

       See CatalystX::SimpleLogin for authors.

       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

       See CatalystX::SimpleLogin for license.

perl v5.36.0                                       2022-08-28              CatalystX::Sim...n::WithRedirect(3pm)

$controller->login_redirect($c,$message)
       This sets the error message to $message and sets "$c->session->{redirect_to_after_login}" to the current
       URL.

       CatalystX::SimpleLogin::TraitFor::Controller::Login::WithRedirect - redirect users who login back to the
       page they originally requested.

       CatalystX::SimpleLogin::Controller::Login
       CatalystX::SimpleLogin::Form::Login

           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' });

redirect_after_login_uri
       Make it use and extract "$c->session->{redirect_to_after_login}" if it exists.