You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
www_admin/lib/admin/Controller/logout.pm

61 lines
829 B

package admin::Controller::logout;
use strict;
use warnings;
use base 'Catalyst::Controller';
=head1 NAME
admin::Controller::logout - Catalyst Controller
=head1 DESCRIPTION
This will log a user out.
=head1 METHODS
=head2 index
The logout function.
=cut
sub index : Private {
my ( $self, $c ) = @_;
$c->log->debug('***logout::index called');
$c->logout();
delete $c->session->{admin};
$c->response->redirect($c->uri_for('/'));
}
=head1 BUGS AND LIMITATIONS
=over
=item currently none
=back
=head1 SEE ALSO
Provisioning model, Catalyst
=head1 AUTHORS
Daniel Tiefnig <dtiefnig@sipwise.com>
=head1 COPYRIGHT
The logout controller is Copyright (c) 2007-2010 Sipwise GmbH, Austria.
You should have received a copy of the licences terms together with the
software.
=cut
# ende gelaende
1;