Central cache access for Assets to handle SSL caching. Fixes bug #11131.

This commit is contained in:
Colin Kuskie 2009-10-20 15:15:38 -07:00
parent f35a9af1fe
commit 5bd5bb48a9
11 changed files with 40 additions and 15 deletions

View file

@ -608,7 +608,8 @@ Generate the view method for the Asset, and handle caching.
sub view {
my $self = shift;
if (!$self->session->var->isAdminOn && $self->get("cacheTimeout") > 10) {
my $out = WebGUI::Cache->new($self->session,"view_".$self->getId)->get;
my $cache = $self->getCache;
my $out = $cache->get if defined $cache;
return $out if $out;
}
my %var = %{$self->get};