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 {
my $self = shift;
delete $session{assetLineage};
delete $session{assetClass};
delete $session{assetRevision};
my $stow = $self->stow;
$stow->delete('assetLineage');
$stow->delete('assetClass');
$stow->delete('assetRevision');
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
sub session {
my ($self) = @_;
return $self->{_session};
}