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

Change purge from override to around.

Browse source
This commit is contained in:
Colin Kuskie 2010-06-17 11:31:31 -07:00
parent 52fe958e1f
commit 10f2cda847
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lib/WebGUI/Role/Asset/Subscribable.pm
View file

@ -422,14 +422,14 @@ Subclass the method to remove the subscription group.
=cut =cut
override purge => sub { around purge => sub {
my $orig = shift;
my $self = shift; my $self = shift;
my $options = shift; my $options = shift;
my $group = $self->getSubscriptionGroup(); my $group = $self->getSubscriptionGroup();
$group->delete if $group; $group->delete if $group;
return $self->$orig($options, @_);
return super();
}; };
#---------------------------------------------------------------------------- #----------------------------------------------------------------------------