NAME
Pangloss::StoredObject::Error - base class for stored object errors.
SYNOPSIS
# abstract - cannot be used directly
package SomeError;
use base qw( Pangloss::StoredObject::Error );
throw SomeError( flag => eExists, ... );
throw SomeError( flag => eNonExistent, ... );
throw SomeError( flag => eInvalid, invalid => { ... });
# with caught errors:
print $e->flag;
do { ... } if $e->isExists;
do { ... } if $e->isNonexistent;
do { ... } if $e->isInvalid;DESCRIPTION
Stored Object Errors class. Inherits interface from Pangloss::Error. Introduces validation error flags.
EXPORTED FLAGS
Error flags: eExists eInvalid eNonExistent
Validation errors: eNameRequired eCreatorRequired eDateRequired
METHODS
- $e->invalid
-
set/get hash of validation error flags.
- $bool = $e->is( $flag )
-
Test if this error's flag is equal to $flag. if this is a validation error also checks in the $e->invalid hash for $flag.
- $bool = $e->isInvalid, $e->isExists, $e->isNonExistent, $e->isNameRequired, $e->isCreatorRequired, $e->isDateRequired
-
Test if this error's flag is equal to the named flag.
TODO
Refactor some of this out to OpenFrame::WebApp.
Write name(), date(), and creator() shortcuts to see if flag is associated with the given instance variable.
AUTHOR
Steve Purkis <spurkis@quiup.com>