/usr/share/perl5/Jifty/Plugin/Authentication/CAS/Action/CASLogout.pm is in libjifty-plugin-authentication-cas-perl 1.00-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 | use warnings;
use strict;
=head1 NAME
Jifty::Plugin::Authentication::CAS::Action::CASLogout - - process CAS logout plugin
=cut
package Jifty::Plugin::Authentication::CAS::Action::CASLogout;
use base qw/Jifty::Action/;
=head2 arguments
Return the email and password form fields
=cut
sub arguments {
return ( {} );
}
=head2 take_action
Nuke the current user object
=cut
sub take_action {
my $self = shift;
Jifty->web->current_user(undef);
return 1;
}
1;
|