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

@ -429,9 +429,9 @@ Extended to support event meta fields.
=cut
sub processEditForm {
override processEditForm => sub {
my $self = shift;
$self->SUPER::processEditForm(@_);
super();
my $form = $self->session->form;
my %metadata = ();
foreach my $field (@{$self->getParent->getEventMetaFields}) {
@ -442,7 +442,7 @@ sub processEditForm {
my $startDate = $form->process('startDate', "dateTime", $date,
{ defaultValue => $date, timeZone => $self->getParent->timezone});
$self->update({eventMetaData => JSON->new->encode(\%metadata), startDate => $startDate});
}
};
#-------------------------------------------------------------------