X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FBP.pm;h=9cf0750e8322f31ae1357bb7c6b014b9184cfe74;hb=12f8fb507f7531f2e434214eb9a8c4d7a55c75d5;hp=711b988e75eabce70181d86695b50aeaafda3996;hpb=aad72b4a0c9e9eafc96dba41c317d3d66baad4fb;p=kivitendo-erp.git

diff --git a/SL/BP.pm b/SL/BP.pm
index 711b988e7..9cf0750e8 100644
--- 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;