X-Git-Url: http://wagnertech.de/git?p=kivitendo-erp.git;a=blobdiff_plain;f=SL%2FDB%2FPaymentTerm.pm;fp=SL%2FDB%2FPaymentTerm.pm;h=2f62bd9ac5790fb8b8b059918c6c2341bd31433f;hp=db443e947657964fdca1adb4200b3ad59e665a61;hb=b293ff8ad52fc76ba0c44783e3982418114d6b08;hpb=d4925a8b60f04674885e30d9316dc0263f8b9a84 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;