#  $Id: user_logout.pm,v 1.5 2006/04/12 13:57:35 jonas Exp $  -*-perl-*-
package Para::Frame::Action::user_logout;
#=====================================================================
#
# DESCRIPTION
#   Paraframe user logout action
#
# AUTHOR
#   Jonas Liljegren   <jonas@paranormal.se>
#
# COPYRIGHT
#   Copyright (C) 2004-2006 Jonas Liljegren.  All Rights Reserved.
#
#   This module is free software; you can redistribute it and/or
#   modify it under the same terms as Perl itself.
#
#=====================================================================

use strict;

use Para::Frame::Route;

sub handler
{
    my( $req ) = @_;

    $Para::Frame::U->logout;

    # Not to be used after a logout
    &Para::Frame::Route::clear_special_params;

    return "Du har nu loggat ut\n";
}

1;


=head1 NAME

Para::Frame::Action::user_logou - For logging out

=cut