X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/65b054be8038e3eeb3dd2c87ba52a82a843cfd4f..2ecfde54bd40a15f430010faa28ec81383e4eec6:/SL/SEPA.pm

diff --git a/SL/SEPA.pm b/SL/SEPA.pm
index 074673261..b8cdee03f 100644
--- a/SL/SEPA.pm
+++ b/SL/SEPA.pm
@@ -280,7 +280,8 @@ sub close_export {
     my $query        = qq|UPDATE sepa_export SET closed = TRUE WHERE id IN ($placeholders)|;
 
     do_query($form, $dbh, $query, map { conv_i($_) } @ids);
-  });
+    1;
+  }) or do { die SL::DB->client->error };
 
   $main::lxdebug->leave_sub();
 }