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

@ -372,17 +372,17 @@ Extend the base method to handle duplicate storage locations and groups.
=cut
sub duplicate {
override duplicate => sub {
my $self = shift;
my $session = $self->session;
my $copy = $self->SUPER::duplicate(@_);
my $copy = super(@_);
if ($self->get('storageId')) {
my $storage = $self->getStorageLocation;
my $copied_storage = $storage->copy;
$copy->update({storageId => $copied_storage->getId});
}
return $copy;
}
};
#-------------------------------------------------------------------