bug fixes

This commit is contained in:
JT Smith 2009-09-25 22:50:59 -05:00
parent ccff9c7014
commit ebb6134c2d
27 changed files with 84 additions and 214 deletions

View file

@ -207,7 +207,7 @@ See WebGUI::Asset::purgeCache() for details.
sub purgeCache {
my $self = shift;
$self->session->cache->delete("view_".$self->getId);
eval{$self->session->cache->delete("view_".$self->getId)};
$self->SUPER::purgeCache;
}
@ -226,7 +226,7 @@ sub view {
# Use cached version for visitors
my $cache = $self->session->cache;
if ($self->session->user->isVisitor) {
my $out = $cache->get("view_".$self->getId);
my $out = eval{$cache->get("view_".$self->getId)};
return $out if $out;
}
@ -291,7 +291,7 @@ sub view {
# Update the cache
if ($self->session->user->isVisitor) {
$cache->set("view_".$self->getId, $out, $self->get("visitorCacheTimeout"));
eval{$cache->set("view_".$self->getId, $out, $self->get("visitorCacheTimeout"))};
}
return $out;