single-dbh: Fehler in Transaktionen immer weiterwerfen

[kivitendo-erp.git] / SL / BP.pm

diff --git a/SL/BP.pm b/SL/BP.pm
index 711b988..9cf0750 100644 (file)
--- a/SL/BP.pm
+++ b/SL/BP.pm
@@ -261,7 +261,8 @@ sub delete_spool {
         unlink(qq|$spool/$form->{"spoolfile_$i"}|);
       }
     }
-  });
+    1;
+  }) or do { die SL::DB->client->error };
 
   $main::lxdebug->leave_sub();
   return 1;