X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/2459723286f701a341062b054a215a266df74e01..180e8de7adfb39c1a2b9f5476c5e28d6b142811a:/SL/DB/PeriodicInvoicesConfig.pm

diff --git a/SL/DB/PeriodicInvoicesConfig.pm b/SL/DB/PeriodicInvoicesConfig.pm
index 45536752c..dba27952d 100644
--- a/SL/DB/PeriodicInvoicesConfig.pm
+++ b/SL/DB/PeriodicInvoicesConfig.pm
@@ -80,10 +80,10 @@ sub calculate_invoice_dates {
   my ($self, %params) = @_;
 
   my $period_len = $self->get_period_length;
-  my $cur_date   = $self->first_billing_date        || $self->start_date;
-  my $end_date   = $self->end_date                  || DateTime->today_local->add(years => 10);
+  my $cur_date   = $self->first_billing_date || $self->start_date;
+  my $end_date   = $self->end_date           || DateTime->today_local->add(years => 10);
   my $start_date = $params{past_dates} ? undef : $self->get_previous_invoice_date;
-  $start_date  ||= $cur_date->clone->subtract(days => 1);
+  $start_date    = $start_date         ? $start_date->subtract(days => 1) : $cur_date->clone;
 
   $start_date    = max($start_date, $params{start_date}) if $params{start_date};
   $end_date      = min($end_date,   $params{end_date})   if $params{end_date};
@@ -91,7 +91,7 @@ sub calculate_invoice_dates {
   my @dates;
 
   while ($cur_date <= $end_date) {
-    push @dates, $cur_date->clone if $cur_date > $start_date;
+    push @dates, $cur_date->clone if $cur_date >= $start_date;
 
     $cur_date->add(months => $period_len);
   }