initial commit of file from CVS for smeserver-manager on Fri Mar 22 14:54:28 AEDT 2024
This commit is contained in:
34
root/usr/share/smanager/lib/SrvMngr/Controller/Logout.pm
Normal file
34
root/usr/share/smanager/lib/SrvMngr/Controller/Logout.pm
Normal file
@@ -0,0 +1,34 @@
|
||||
package SrvMngr::Controller::Logout;
|
||||
|
||||
#----------------------------------------------------------------------
|
||||
# heading : Current User
|
||||
# description : Logout
|
||||
# navigation : 1000 900
|
||||
# menu : U
|
||||
#
|
||||
# routes : end
|
||||
#----------------------------------------------------------------------
|
||||
|
||||
use strict;
|
||||
use warnings;
|
||||
use Mojo::Base 'Mojolicious::Controller';
|
||||
|
||||
use Locale::gettext;
|
||||
use SrvMngr::I18N;
|
||||
|
||||
use SrvMngr qw( theme_list init_session );
|
||||
|
||||
|
||||
sub logout {
|
||||
|
||||
my $c = shift;
|
||||
$c->app->log->info($c->log_req);
|
||||
|
||||
$c->session( expires => 1 );
|
||||
$c->flash( success => 'Goodbye' );
|
||||
|
||||
$c->redirect_to( $c->home_page );
|
||||
}
|
||||
|
||||
|
||||
1;
|
Reference in New Issue
Block a user