NAME

OpenFrame::WebApp::Segment::User::SaveInSession - save user to session.

SYNOPSIS

use Pipeline;
use OpenFrame::WebApp;

my $pipe = new Pipeline;

$OpenFrame::WebApp::Segment::User::Session::USER_KEY = 'my_user';

my $usaver = new OpenFrame::WebApp::Segment::User::SaveInSession;
$pipe->add_segment( $uloader, ... $usaver, ... );

$pipe->dispatch;

DESCRIPTION

Save a User into the Session if both objects can be found in the store.

AUTHOR

Steve Purkis <spurkis@epn.nu>

COPYRIGHT

Copyright (c) 2003 Steve Purkis. All rights reserved. Released under the same license as Perl itself.

SEE ALSO

OpenFrame::WebApp::User, OpenFrame::WebApp::Segment::User, OpenFrame::WebApp::Segment::User::Session