SL::DB::{Chart,Part}: Verwendung von $::request->cache()

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

diff --git a/SL/DB/Chart.pm b/SL/DB/Chart.pm
index db8a3b945c13805d60306361865f5d8b669db3ca..7c50b43d3f548b3407474c0cbd1245f94a59359d 100644 (file)
--- a/SL/DB/Chart.pm
+++ b/SL/DB/Chart.pm
@@ -17,7 +17,7 @@ sub get_active_taxkey {
   my ($self, $date) = @_;
   $date ||= DateTime->today_local;
 
-  my $cache = $::request->{cache}{chart}{$date};
+  my $cache = $::request->cache("get_active_taxkey")->{$date} //= {};
   if ($cache->{$self->id}) {
     return $cache->{$self->id};
   }