fixed a bug where wobjects would lose their sequence number when edited.
This commit is contained in:
parent
a716541e0c
commit
864a88c322
2 changed files with 4 additions and 10 deletions
|
|
@ -1410,19 +1410,21 @@ sub www_editSave {
|
|||
return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditPage());
|
||||
my %set;
|
||||
foreach my $key (keys %{$_[0]->{_wobjectProperties}}) {
|
||||
$set{$key} = WebGUI::FormProcessor::process(
|
||||
my $temp = WebGUI::FormProcessor::process(
|
||||
$key,
|
||||
$_[0]->{_wobjectProperties}{$key}{fieldType},
|
||||
$_[0]->{_wobjectProperties}{$key}{defaultValue}
|
||||
);
|
||||
$set{$key} = $temp if (defined $temp);
|
||||
}
|
||||
$set{title} = $session{form}{title} || $_[0]->name;
|
||||
foreach my $key (keys %{$_[0]->{_extendedProperties}}) {
|
||||
$set{$key} = WebGUI::FormProcessor::process(
|
||||
my $temp = WebGUI::FormProcessor::process(
|
||||
$key,
|
||||
$_[0]->{_extendedProperties}{$key}{fieldType},
|
||||
$_[0]->{_extendedProperties}{$key}{defaultValue}
|
||||
);
|
||||
$set{$key} = $temp if (defined $temp);
|
||||
}
|
||||
%set = (%set, %{$_[1]});
|
||||
$_[0]->set(\%set);
|
||||
|
|
|
|||
|
|
@ -79,14 +79,6 @@ sub uiLevel {
|
|||
sub www_edit {
|
||||
my $properties = WebGUI::HTMLForm->new;
|
||||
my $layout = WebGUI::HTMLForm->new;
|
||||
$properties->hidden(
|
||||
-name=>"proxiedNamespace",
|
||||
-value=>$_[0]->get("proxiedNamespace")
|
||||
);
|
||||
$properties->hidden(
|
||||
-name=>"proxiedWobjectId",
|
||||
-value=>$_[0]->get("proxiedWobjectId")
|
||||
);
|
||||
$layout->template(
|
||||
-name=>"proxiedTemplateId",
|
||||
-value=>$_[0]->getValue("proxiedTemplateId"),
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue