Revision 660c7e53
Von Sven Schöling vor mehr als 8 Jahren hinzugefügt
| SL/DB/Helper/Metadata.pm | ||
|---|---|---|
|
package SL::DB::Helper::Metadata;
|
||
|
|
||
|
use strict;
|
||
|
use SL::X;
|
||
|
|
||
|
use Rose::DB::Object::Metadata;
|
||
|
use SL::DB::Helper::ConventionManager;
|
||
| ... | ... | |
|
SL::DB::Helper::Attr::auto_make($self->class);
|
||
|
}
|
||
|
|
||
|
sub handle_error {
|
||
|
my($self, $object) = @_;
|
||
|
|
||
|
# these are used as Rose internal canaries, don't wrap them
|
||
|
die $object->error if UNIVERSAL::isa($object->error, 'Rose::DB::Object::Exception');
|
||
|
|
||
|
die SL::X::DBRoseError->new(
|
||
|
error => $object->error,
|
||
|
class => ref($object),
|
||
|
metaobject => $self,
|
||
|
object => $object,
|
||
|
);
|
||
|
}
|
||
|
|
||
|
1;
|
||
Auch abrufbar als: Unified diff
DB Transaktionen - Fehler nach oben durchreichen