SelfTests falscher Zeitraum für Standard-Tests

diff --git a/SL/BackgroundJob/SelfTest/Transactions.pm b/SL/BackgroundJob/SelfTest/Transactions.pm
index 0333ec9b36588bf93be6c597ca77c2e62c1e21ae..f57c3fded61b79dbe89ae6e7d24c149e5230ee86 100644 (file)
--- a/SL/BackgroundJob/SelfTest/Transactions.pm
+++ b/SL/BackgroundJob/SelfTest/Transactions.pm
@@ -43,12 +43,8 @@ sub _setup {
   my ($self) = @_;
 
   # TODO FIXME calc dates better, unless this is wanted
   my ($self) = @_;
 
   # TODO FIXME calc dates better, unless this is wanted

-#  my $year =
-  #$self->fromdate(DateTime->new(day => 1, month => 1, year => DateTime->today->year));
-  #$self->todate($self->fromdate->clone->add(years => 1)->add(days => -1));
-  $self->fromdate(DateTime->new(day => 1, month => 1, year => 2015));
+  $self->fromdate(DateTime->new(day => 1, month => 1, year => DateTime->today->year));

   $self->todate($self->fromdate->clone->add(years => 1)->add(days => -1));
   $self->todate($self->fromdate->clone->add(years => 1)->add(days => -1));

-  $main::lxdebug->message(0, 'hier und dort:' . $self->fromdate . ' mit ' . $self->todate);

   $self->dbh($::form->get_standard_dbh);
 }
 
   $self->dbh($::form->get_standard_dbh);
 }