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

@ -110,9 +110,10 @@ See WebGUI::Asset::prepareView() for details.
=cut
sub prepareView {
around prepareView => sub {
my $orig = shift;
my $self = shift;
$self->SUPER::prepareView();
$self->$orig(@_);
my $template = WebGUI::Asset::Template->newById($self->session, $self->templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
@ -123,7 +124,7 @@ sub prepareView {
}
$template->prepare;
$self->{_viewTemplate} = $template;
}
};
#-------------------------------------------------------------------