The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Pangloss::Segment::UserLoader - load current user.

SYNOPSIS

  $pipe->add_segment( Pangloss::Segment::UserLoader->new )

DESCRIPTION

This class inherits its interface from Pipeline::Segment.

On dispatch(), tries to load the user from the request. If found, it checks with pangloss to make sure the user is valid, and saves the object in the session.

AUTHOR

Steve Purkis <spurkis@quiup.com>

SEE ALSO

Pangloss::Application::UserEditor