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

When a post is purged, disqualify it as the last post in its thread, and the parent CS. Fixes bug #12183

Browse source
This commit is contained in:
Colin Kuskie 2011-07-11 15:04:54 -07:00
parent a945396163
commit 9113408408
3 changed files with 115 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lib/WebGUI/Asset/Post.pm
View file

@ -1232,14 +1232,18 @@ Extend the base method to handle cleaning up storage locations.
=cut
sub purge {
my $self = shift;
my $self = shift;
my $purged = $self->next::method;
if ($purged) {
my $sth = $self->session->db->read("select storageId from Post where assetId=".$self->session->db->quote($self->getId));
while (my ($storageId) = $sth->array) {
my $storage = WebGUI::Storage->get($self->session, $storageId);
my $storage = WebGUI::Storage->get($self->session, $storageId);
$storage->delete if defined $storage;
}
$sth->finish;
return $self->next::method;
$self->disqualifyAsLastPost;
}
return $purged;
}
#-------------------------------------------------------------------