X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/ecc3f8bc2af5b6f64ddf3a58967f3cb2cbac3977..71eff037f1b2da6a2a2e3a392a6332648d805a6a:/SL/Helper/Inventory.pm

diff --git a/SL/Helper/Inventory.pm b/SL/Helper/Inventory.pm
index 4da9bb798..17a7d98c0 100644
--- a/SL/Helper/Inventory.pm
+++ b/SL/Helper/Inventory.pm
@@ -282,8 +282,11 @@ sub check_constraints {
           warehouse_id => t8('Warehouses'),
           chargenumber => t8('Chargenumbers'),
         );
+        my @allocs = grep { !$whitelist{$_->$accessor} } @$allocations;
         die SL::X::Inventory::Allocation->new(
-          error => 'allocation constraints failure',
+          accessor    => $accessor,
+          allocations => \@allocs,
+          error       => 'allocation constraints failure',
           msg => t8("Allocations didn't pass constraints for #1",$error_constraints{$_}),
         );
       }