
Pangloss::Application::Base - base class for application objects.

# abstract class - cannot be used directly
use base qw( Pangloss::Application::Base );
sub foo {
my $self = shift;
$self->parent;
$self->store;
my $obj = $self->get_or_create_stored_obj( $key, $class );
$self->save( $obj );
}

This is a base class for all application objects.

set/get the parent application.
set/get the parent's store.
gets or creates an object bound to $key from the store. calls $class->new and stores the result if no object is found in the store.
save this object in the store.

Steve Purkis <spurkis@quiup.com>
