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

[mfinanz.git] / SL / DB / Chart.pm

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;
-  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];
 }