diff --git a/gorgone/gorgone/class/db.pm b/gorgone/gorgone/class/db.pm index 8b1d7aa4111..e66ea877466 100644 --- a/gorgone/gorgone/class/db.pm +++ b/gorgone/gorgone/class/db.pm @@ -161,6 +161,11 @@ sub set_inactive_destroy { sub start_transaction { my $self = shift; + if ($self->{in_transaction}) { + $self->error('starting a transaction while already in a transaction', 'begin work'); + return -1; + } + my $status; if (!defined($self->{instance})) { $status = $self->connect();