Parent Directory
| 
Revision Log
login now preserves continuations, run { }; rules in despatcher should *REALLY* end with
; to avoid havoc, added dump of rules on startup
| 1 | dpavlin | 5 | use warnings; |
| 2 | use strict; | ||
| 3 | |||
| 4 | =head1 NAME | ||
| 5 | |||
| 6 | dpavlin | 20 | Transports::Action::Logout |
| 7 | dpavlin | 5 | |
| 8 | =cut | ||
| 9 | |||
| 10 | dpavlin | 20 | package Transports::Action::Logout; |
| 11 | use base qw/Transports::Action Jifty::Action/; | ||
| 12 | dpavlin | 5 | |
| 13 | =head2 arguments | ||
| 14 | |||
| 15 | Return the email and password form fields | ||
| 16 | |||
| 17 | =cut | ||
| 18 | |||
| 19 | sub arguments { | ||
| 20 | dpavlin | 87 | return( { } ); |
| 21 | dpavlin | 5 | } |
| 22 | |||
| 23 | =head2 take_action | ||
| 24 | |||
| 25 | Nuke the current user object | ||
| 26 | |||
| 27 | =cut | ||
| 28 | |||
| 29 | sub take_action { | ||
| 30 | my $self = shift; | ||
| 31 | Jifty->web->current_user(undef); | ||
| 32 | return 1; | ||
| 33 | } | ||
| 34 | |||
| 35 | 1; |
| ViewVC Help | |
| Powered by ViewVC 1.1.26 |