Remove all unnecessary usage of SUPER from Assets

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

View file

@ -211,9 +211,9 @@ Overriden to include any topics in which this story would appear.
=cut
sub exportGetRelatedAssetIds {
override exportGetRelatedAssetIds => sub {
my $self = shift;
my $rel = $self->SUPER::exportGetRelatedAssetIds(@_);
my $rel = super();
push @$rel, @{
WebGUI::Keyword->new($self->session)->getMatchingAssets({
keywords => WebGUI::Keyword::string2list($self->get('keywords')),
@ -221,7 +221,7 @@ sub exportGetRelatedAssetIds {
})
};
return $rel;
}
};
#-------------------------------------------------------------------