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

Remove all unnecessary usage of SUPER from Assets

Browse source
This commit is contained in:
Colin Kuskie 2011-12-07 08:26:08 -08:00
parent c2baef0bde
commit 5f9f1e6dec
46 changed files with 175 additions and 171 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -253,10 +253,10 @@ Extends the base method to handle creating a new subscription group.
=cut
sub duplicate {
override duplicate => sub {
my $self = shift;
my $session = $self->session;
my $copy = $self->SUPER::duplicate(@_);
my $copy = super();
my $key = 'subscriptionGroupId';
my $oldGroupId = $self->get($key);
@ -270,7 +270,7 @@ sub duplicate {
}
}
return $copy;
}
};
#-------------------------------------------------------------------
@ -414,16 +414,16 @@ Extend the base method from Post to remove the pagination query fragment
=cut
sub getThreadLinkUrl {
override getThreadLinkUrl => sub {
my $self = shift;
my $url = $self->SUPER::getThreadLinkUrl();
my $url = super();
$url =~ s/\?pn=\d+//;
if ($url =~ m{;revision=\d+}) {
$url =~ s/;revision/?revision/;
}
return $url;
}
};
#-------------------------------------------------------------------
@ -740,13 +740,13 @@ See WebGUI::Asset::prepareView() for details.
=cut
sub prepareView {
override prepareView => sub {
my $self = shift;
$self->SUPER::prepareView();
super();
my $template = WebGUI::Asset::Template->newById($self->session, $self->getParent->threadTemplateId);
$template->prepare($self->getMetaDataAsTemplateVariables);
$self->{_viewTemplate} = $template;
}
};
#-------------------------------------------------------------------