Ältere RDBO-Versionen kennen 'where' als Alias für 'query' beim Manager nicht

diff --git a/SL/BackgroundJob/CreatePeriodicInvoices.pm b/SL/BackgroundJob/CreatePeriodicInvoices.pm
index 559fd0299d94ea0a49458a260b1da2b99cd29e8e..0bbea2d86ad7dbd96272e7273958a6a6aaff7fe5 100644 (file)
--- a/SL/BackgroundJob/CreatePeriodicInvoices.pm
+++ b/SL/BackgroundJob/CreatePeriodicInvoices.pm
@@ -22,7 +22,7 @@ sub run {
   my $self        = shift;
   $self->{db_obj} = shift;
 
   my $self        = shift;
   $self->{db_obj} = shift;
 

-  my $configs = SL::DB::Manager::PeriodicInvoicesConfig->get_all(where => [ active => 1 ]);
+  my $configs = SL::DB::Manager::PeriodicInvoicesConfig->get_all(query => [ active => 1 ]);

 
   foreach my $config (@{ $configs }) {
     my $new_end_date = $config->handle_automatic_extension;
 
   foreach my $config (@{ $configs }) {
     my $new_end_date = $config->handle_automatic_extension;

diff --git a/SL/DB/Chart.pm b/SL/DB/Chart.pm
index bda45128c584aec1234163fc190c79da8115ae4f..70019c6fb8533e7edfa8f10bc3d39386d01fc155 100644 (file)
--- a/SL/DB/Chart.pm
+++ b/SL/DB/Chart.pm
@@ -17,7 +17,7 @@ __PACKAGE__->meta->initialize;
 sub get_active_taxkey {
   my ($self, $date) = @_;
   $date ||= DateTime->today_local;
 sub get_active_taxkey {
   my ($self, $date) = @_;
   $date ||= DateTime->today_local;

-  return SL::DB::Manager::TaxKey->get_all(where   => [ and => [ chart_id  => $self->id,
+  return SL::DB::Manager::TaxKey->get_all(query   => [ and => [ chart_id  => $self->id,

                                                                 startdate => { le => $date } ] ],
                                           sort_by => "startdate DESC")->[0];
 }
                                                                 startdate => { le => $date } ] ],
                                           sort_by => "startdate DESC")->[0];
 }

diff --git a/SL/DB/Manager/BackgroundJob.pm b/SL/DB/Manager/BackgroundJob.pm
index 1429a7856e00dd5d0c15072ea3fb79a1e3925fa3..96af86312712954eb96272ea4cd12089f7d9a78f 100644 (file)
--- a/SL/DB/Manager/BackgroundJob.pm
+++ b/SL/DB/Manager/BackgroundJob.pm
@@ -29,7 +29,7 @@ sub get_all_need_to_run {
                                                  next_run_at => undef,
                                                  next_run_at => { le => $now } ] ]);
 
                                                  next_run_at => undef,
                                                  next_run_at => { le => $now } ] ]);
 

-  return $class->get_all(where => [ or => [ @interval_args, @once_args ] ]);
+  return $class->get_all(query => [ or => [ @interval_args, @once_args ] ]);

 }
 
 1;
 }
 
 1;