GL u. AccTransCorrections: signle-dbh: "client" hinzugefügt bei with_transaction

[mfinanz.git] / SL / GL.pm

diff --git a/SL/GL.pm b/SL/GL.pm
index 1d3065c2a3ccd6a0476824f404e28726bfe68edc..9e3806a05b1878cc967b0fbe54e60371eee180e7 100644 (file)
--- a/SL/GL.pm
+++ b/SL/GL.pm
@@ -50,7 +50,7 @@ sub delete_transaction {
   my ($self, $myconfig, $form) = @_;
   $main::lxdebug->enter_sub();
 
   my ($self, $myconfig, $form) = @_;
   $main::lxdebug->enter_sub();
 

-  SL::DB->with_transaction(sub {
+  SL::DB->client->with_transaction(sub {

     do_query($form, SL::DB->client->dbh, qq|DELETE FROM gl WHERE id = ?|, conv_i($form->{id}));
     1;
   }) or do { die SL::DB->client->error };
     do_query($form, SL::DB->client->dbh, qq|DELETE FROM gl WHERE id = ?|, conv_i($form->{id}));
     1;
   }) or do { die SL::DB->client->error };