Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision bba2bff3

Von Moritz Bunkus vor mehr als 10 Jahren hinzugefügt

  • ID bba2bff3e15b5e5d2852822f6e060166fe0c51fe
  • Vorgänger 0682dd7e
  • Nachfolger db0ab48c

SL::DB::Part: Cachen von Objekten gefixt Teil 2

get_active_taxkey hat vorher ganz einfach nicht gecachet.

Unterschiede anzeigen:

SL/DB/Chart.pm
18 18
  $date ||= DateTime->today_local;
19 19

  
20 20
  my $cache = $::request->cache("get_active_taxkey")->{$date} //= {};
21
  if ($cache->{$self->id}) {
22
    return $cache->{$self->id};
23
  }
21
  return $cache->{$self->id} if $cache->{$self->id};
24 22

  
25 23
  require SL::DB::TaxKey;
26
  return SL::DB::Manager::TaxKey->get_all(query   => [ and => [ chart_id  => $self->id,
27
                                                                startdate => { le => $date } ] ],
28
                                          sort_by => "startdate DESC")->[0];
24
  return $cache->{$self->id} = SL::DB::Manager::TaxKey->get_all(
25
    query   => [ and => [ chart_id  => $self->id,
26
                          startdate => { le => $date } ] ],
27
    sort_by => "startdate DESC")->[0];
29 28
}
30 29

  
31 30
1;

Auch abrufbar als: Unified diff