X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FGL.pm;h=7bcb475090160ffea5c79d6e06d6991953c4dcbc;hb=14817fd938d8bdc6627e37aca09abb7aba43c290;hp=c9fcd9c476ecf207ef064e26ea476e1a77ff5f9c;hpb=9981de23726fdc95f753cc7e5cba15999c8ab507;p=kivitendo-erp.git

diff --git a/SL/GL.pm b/SL/GL.pm
index c9fcd9c47..7bcb47509 100644
--- a/SL/GL.pm
+++ b/SL/GL.pm
@@ -51,9 +51,8 @@ sub delete_transaction {
   # connect to database
   my $dbh = $form->dbconnect_noauto($myconfig);
 
-  my @values = (conv_i($form->{id}));
-  do_query($form, $dbh, qq|DELETE FROM acc_trans WHERE trans_id = ?|, @values);
-  do_query($form, $dbh, qq|DELETE FROM gl WHERE id = ?|, @values);
+  # acc_trans entries are deleted by database triggers.
+  do_query($form, $dbh, qq|DELETE FROM gl WHERE id = ?|, conv_i($form->{id}));
 
   # commit and redirect
   my $rc = $dbh->commit;