X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/e3b5a9cea4a8876a20356979160e68137696c798..fbcd5580:/t/wh/transfer.t diff --git a/t/wh/transfer.t b/t/wh/transfer.t index 66daf58f7..2a05c55d3 100644 --- a/t/wh/transfer.t +++ b/t/wh/transfer.t @@ -26,7 +26,7 @@ SL::DB::Manager::Bin ->delete_all(where => [ or => [ description => NAME() SL::DB::Manager::Warehouse->delete_all(where => [ description => NAME() ]); # Create test data -$part = SL::DB::Part->new(unit => 'mg', description => NAME(), partnumber => NAME()); +$part = SL::DB::Part->new(unit => 'mg', description => NAME(), partnumber => NAME(), part_type => 'part'); $part->save(); is(ref($part), 'SL::DB::Part', 'loading a part to test with id ' . $part->id);