Skip to content
Permalink
Browse files

Make sure that HttpProxy cleans up after itself when purging assets o…

…r revisions.
  • Loading branch information...
perlDreamer committed Feb 14, 2012
1 parent 80ec20b commit 82554add6bf48371ae2f31feb7ceab5d6dff1e44
Showing with 25 additions and 2 deletions.
  1. +1 −0 docs/changelog/7.x.x.txt
  2. +24 −2 lib/WebGUI/Asset/Wobject/HttpProxy.pm
@@ -1,6 +1,7 @@
7.10.25
- fixed #12321: Error while deleting a group.
- fixed #12322: Cache/CHI stomps on the config file
- fixed #12327: HttpProxy does not clean up cookie jar storage locations

7.10.24
- fixed #12318: asset error causes asset manager to fail
@@ -256,14 +256,36 @@ sub prepareView {

=head2 purge
Extend the base method to delete the cookie jar
Extend the base method to delete all cookie jars for this HttpProxy
=cut

sub purge {
my $self = shift;
my $id = $self->getId;
my $session = $self->session;
my @storageIds = $session->db->buildArray("select cookieJarStorageId from HttpProxy where assetId=?",[$id]);
my $success = $self->SUPER::purge;
return 0 unless $success;
foreach my $storageId (@storageIds) {
my $storage = WebGUI::Storage->get($session, $storageId);
$storage->delete if defined $storage;
}
return 1;
}

#-------------------------------------------------------------------

=head2 purgeRevision
Extend the base method to delete the cookie jar for this revision.
=cut

sub purgeRevision {
my $self = shift;
$self->getCookieJar->delete;
$self->SUPER::purge;
$self->SUPER::purgeRevision;
}


0 comments on commit 82554ad

Please sign in to comment.
You can’t perform that action at this time.