X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/17e547071d67a5063e3067b1dd72035c0192bacb..a60b31d79b1ec87fbb804d53a4bf09186eda8ea3:/SL/DB/Object.pm?ds=inline diff --git a/SL/DB/Object.pm b/SL/DB/Object.pm index d1e6cb0aa..d176a1f74 100755 --- a/SL/DB/Object.pm +++ b/SL/DB/Object.pm @@ -120,6 +120,8 @@ sub save { 1; }; SL::DB::Object::Hooks::run_hooks($self, 'after_save', $result); + + return $result; }; $self->db->in_transaction ? $worker->() : $self->db->do_transaction($worker); @@ -140,6 +142,8 @@ sub delete { 1; }; SL::DB::Object::Hooks::run_hooks($self, 'after_delete', $result); + + return $result; }; $self->db->in_transaction ? $worker->() : $self->db->do_transaction($worker);