Tests: price_tax_calculator.t muss vor Kunden löschen richtig aufräumen

[mfinanz.git] / t / db_helper / price_tax_calculator.t

diff --git a/t/db_helper/price_tax_calculator.t b/t/db_helper/price_tax_calculator.t
index f7aa9ab0ae92b3a611c73a0faaf310a10310a23a..220cd42b532dcca6e9d4692201ecc451857109e9 100644 (file)
--- a/t/db_helper/price_tax_calculator.t
+++ b/t/db_helper/price_tax_calculator.t
@@ -14,8 +14,10 @@ use Test::Exception;
 use SL::DB::Buchungsgruppe;
 use SL::DB::Currency;
 use SL::DB::Customer;
+use SL::DB::DeliveryOrder;
 use SL::DB::Employee;
 use SL::DB::Invoice;
+use SL::DB::Order;
 use SL::DB::Part;
 use SL::DB::Unit;
 use SL::DB::TaxZone;
@@ -27,6 +29,8 @@ sub reset_state {
 
   $params{$_} ||= {} for qw(buchungsgruppe unit customer part tax);
 
+  SL::DB::Manager::Order->delete_all(all => 1);
+  SL::DB::Manager::DeliveryOrder->delete_all(all => 1);
   SL::DB::Manager::Invoice->delete_all(all => 1);
   SL::DB::Manager::Part->delete_all(all => 1);
   SL::DB::Manager::Customer->delete_all(all => 1);