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

Moose override for paste (Post only)

Browse source
This commit is contained in:
Colin Kuskie 2010-04-07 15:25:21 -07:00
parent ee725b0b84
commit 7ba89245fa
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -989,10 +989,10 @@ Extends the master method to handle incrementing replies.
=cut =cut
sub paste { override paste => sub {
my $self = shift; my $self = shift;
$self->SUPER::paste(@_); super();
# First, figure out what Thread we're under # First, figure out what Thread we're under
my $thread = $self->getLineage( [ qw{ self ancestors } ], { my $thread = $self->getLineage( [ qw{ self ancestors } ], {
@ -1024,7 +1024,7 @@ sub paste {
# Recount the replies under the thread. # Recount the replies under the thread.
$thread->sumReplies; $thread->sumReplies;
} };
#------------------------------------------------------------------- #-------------------------------------------------------------------