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

Proper Moose setup for addRevision...

Browse source
This commit is contained in:
Colin Kuskie 2010-04-06 16:13:02 -07:00
parent 64f7bd9365
commit dee5bbe5d0
8 changed files with 58 additions and 120 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lib/WebGUI/Asset/Post/Thread.pm
View file

@ -85,12 +85,12 @@ Extend the base method to handle creating a subscription group for this Thread.
=cut
sub addRevision {
my $self = shift;
my $newSelf = $self->SUPER::addRevision(@_);
override addRevision => sub {
my $self = shift;
my $newSelf = super();
$newSelf->createSubscriptionGroup;
return $newSelf;
}
};
#-------------------------------------------------------------------