oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

cleanup from conversion

Browse source
This commit is contained in:
Colin Kuskie 2006-01-13 04:08:18 +00:00
parent 1dc95fe512
commit e9e1a30a37
1 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lib/WebGUI/Asset.pm
View file

@ -1291,9 +1291,10 @@ Purges all cache entries associated with this asset.
sub purgeCache { sub purgeCache {
my $self = shift; my $self = shift;
delete $session{assetLineage}; my $stow = $self->stow;
delete $session{assetClass}; $stow->delete('assetLineage');
delete $session{assetRevision}; $stow->delete('assetClass');
$stow->delete('assetRevision');
WebGUI::Cache->new($self->session,["asset",$self->getId,$self->get("revisionDate")])->deleteChunk(["asset",$self->getId]); WebGUI::Cache->new($self->session,["asset",$self->getId,$self->get("revisionDate")])->deleteChunk(["asset",$self->getId]);
} }
@ -1307,6 +1308,7 @@ Returns a reference to the current session.
=cut =cut
sub session { sub session {
my ($self) = @_;
return $self->{_session}; return $self->{_session};
} }