X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDB%2FPaymentTerm.pm;h=2f62bd9ac5790fb8b8b059918c6c2341bd31433f;hb=e7c0d9cec5bc78093fa2b10ebc489f1b3bca4960;hp=db443e947657964fdca1adb4200b3ad59e665a61;hpb=f53a118d7c22a85f3fd32876d9a3d1a5af3846c5;p=kivitendo-erp.git

diff --git a/SL/DB/PaymentTerm.pm b/SL/DB/PaymentTerm.pm
index db443e947..2f62bd9ac 100644
--- a/SL/DB/PaymentTerm.pm
+++ b/SL/DB/PaymentTerm.pm
@@ -35,7 +35,7 @@ sub calc_date {
   }
 
   my $terms           = ($params{terms} // 'net') eq 'discount' ? 'terms_skonto' : 'terms_netto';
-  my $date            = $reference_date->add(days => $self->$terms);
+  my $date            = $reference_date->clone->add(days => $self->$terms);
 
   my $dow             = $date->day_of_week;
   $date               = $date->add(days => 8 - $dow) if $dow > 5;