oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Save the Navigation fields that are drawn custom.

Browse source
This commit is contained in:
Colin Kuskie 2013-09-13 15:11:12 -07:00
parent e42ca6b870
commit 651c7c8982
1 changed files with 39 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

39
lib/WebGUI/Asset/Wobject/Navigation.pm
View file

@ -326,6 +326,45 @@ override prepareView => sub {
};
#-------------------------------------------------------------------
=head2 processEditForm ( )
Extend the super class to handle saving the form fields that we've drawn ourselves.
=cut
override processEditForm => sub {
my $self = shift;
my $form = $self->session->form;
my $overrides = $self->session->config->get( "assets/" . $self->get("className") . "/fields" );
my %data;
super();
foreach my $property ( qw/assetsToInclude startType startPoint ancestorEndPoint descendantEndPoint/ ) {
my $fieldType = $self->meta->find_attribute_by_name($property)->fieldType;
my $fieldOverrides = $overrides->{$property} || {};
my $fieldHash = {
tab => "properties",
%{ $self->getFormProperties($property) },
%{$overrides},
name => $property,
value => $self->$property,
};
# process the form element
my $defaultValue = $overrides->{defaultValue} // $self->$property;
$data{$property} = $form->process( $property, $fieldType, $defaultValue, $fieldHash );
} ## end foreach my $property ( $self...)
$self->session->db->beginTransaction;
$self->update( \%data );
$self->session->db->commit;
};
#-------------------------------------------------------------------
=head2 view ( )