Moose overrides in Event, File, Post
This commit is contained in:
parent
b6b5e6c939
commit
0c003083a0
3 changed files with 25 additions and 24 deletions
|
|
@ -1515,9 +1515,9 @@ Requests that the events be committed
|
|||
|
||||
=cut
|
||||
|
||||
sub processPropertiesFromFormPost {
|
||||
override processPropertiesFromFormPost => sub {
|
||||
my $self = shift;
|
||||
$self->SUPER::processPropertiesFromFormPost; # Updates the event
|
||||
super();
|
||||
my $session = $self->session;
|
||||
my $form = $session->form;
|
||||
|
||||
|
|
@ -1742,7 +1742,7 @@ sub processPropertiesFromFormPost {
|
|||
|
||||
delete $self->{_storageLocation};
|
||||
return undef;
|
||||
}
|
||||
};
|
||||
|
||||
#-------------------------------------------------------------------
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue