projects
/
kivitendo-erp.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
ea974a5
)
RDBO: Exceptions in before_*/after_*-Hooks bubblen
author
Moritz Bunkus
<m.bunkus@linet-services.de>
Fri, 19 Apr 2013 12:14:02 +0000
(14:14 +0200)
committer
Moritz Bunkus
<m.bunkus@linet-services.de>
Fri, 19 Apr 2013 12:14:30 +0000
(14:14 +0200)
SL/DB/Object.pm
patch
|
blob
|
history
diff --git
a/SL/DB/Object.pm
b/SL/DB/Object.pm
index
1c7c050
..
8b86e97
100755
(executable)
--- a/
SL/DB/Object.pm
+++ b/
SL/DB/Object.pm
@@
-134,12
+134,12
@@
sub save {
my ($result, $exception);
my $worker = sub {
my ($result, $exception);
my $worker = sub {
- SL::DB::Object::Hooks::run_hooks($self, 'before_save');
$exception = $EVAL_ERROR unless eval {
$exception = $EVAL_ERROR unless eval {
+ SL::DB::Object::Hooks::run_hooks($self, 'before_save');
$result = $self->SUPER::save(@args);
$result = $self->SUPER::save(@args);
+ SL::DB::Object::Hooks::run_hooks($self, 'after_save', $result);
1;
};
1;
};
- SL::DB::Object::Hooks::run_hooks($self, 'after_save', $result);
return $result;
};
return $result;
};
@@
-156,12
+156,12
@@
sub delete {
my ($result, $exception);
my $worker = sub {
my ($result, $exception);
my $worker = sub {
- SL::DB::Object::Hooks::run_hooks($self, 'before_delete');
$exception = $EVAL_ERROR unless eval {
$exception = $EVAL_ERROR unless eval {
+ SL::DB::Object::Hooks::run_hooks($self, 'before_delete');
$result = $self->SUPER::delete(@args);
$result = $self->SUPER::delete(@args);
+ SL::DB::Object::Hooks::run_hooks($self, 'after_delete', $result);
1;
};
1;
};
- SL::DB::Object::Hooks::run_hooks($self, 'after_delete', $result);
return $result;
};
return $result;
};