From 14874239b1e146aa861c73aff5fbfbd59992b24b Mon Sep 17 00:00:00 2001
From: Thomas Heck <theck@linet-services.de>
Date: Thu, 17 Oct 2013 15:20:29 +0200
Subject: [PATCH] Rechnung als neu verwenden: keine Fehlermeldung ausgeben
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

wenn keine Zahlungsbedingungen gesetzt sind.
Als Fälligkeitsdatum wird das Rechnungsdatum gesetzt.
fixt #2348
---
 SL/Form.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/SL/Form.pm b/SL/Form.pm
index e28c35376..04ac43c41 100644
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -1944,7 +1944,7 @@ sub get_duedate {
               : $self->{vendor_id}   ? SL::DB::Vendor     ->new(id => $self->{vendor_id})  ->load->payment
               :                        croak("Missing field in \$::form: payment_id, customer_id or vendor_id");
 
-  my $duedate = $terms->calc_date(reference_date => $reference_date)->to_kivitendo;
+  my $duedate = $terms ? $terms->calc_date(reference_date => $reference_date)->to_kivitendo : undef;
 
   $main::lxdebug->leave_sub();
 
-- 
2.20.1