X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/86a253d0ae396ebb8131d5fe60dcb29d35d748ca..c4104eb32fe068961c83d5905816686637d4abc6:/SL/Helper/ShippedQty.pm diff --git a/SL/Helper/ShippedQty.pm b/SL/Helper/ShippedQty.pm index 5135823e7..af2a4f47c 100644 --- a/SL/Helper/ShippedQty.pm +++ b/SL/Helper/ShippedQty.pm @@ -258,6 +258,7 @@ sub normalize_input { $self->objects($data); } else { die 'object or reference in data while expecting ids' if any { ref($_) } @$data; + die 'ids need to be numbers' if any { ! ($_ * 1) } @$data; $self->oe_ids($data); }