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

fixed: editting DataForm email fields resets their name

Browse source
This commit is contained in:
Graham Knop 2008-09-17 15:37:55 +00:00
parent b8547a918a
commit 568fd0b608
2 changed files with 7 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
docs/changelog/7.x.x.txt
View file

@ -1,4 +1,5 @@
7.6.0 7.6.0
- fixed: editting DataForm email fields resets their name
- no longer preloads files that start with . - no longer preloads files that start with .
- rfe: let package import inherit permissions - rfe: let package import inherit permissions
- added fieldsets around form controls with multiple elements - added fieldsets around form controls with multiple elements

6
lib/WebGUI/Asset/Wobject/DataForm.pm
View file

@ -1095,6 +1095,12 @@ sub www_editFieldSave {
my $fieldName = $form->process('fieldName'); my $fieldName = $form->process('fieldName');
my $newName = $self->session->url->urlize($form->process('newName') || $form->process('label')); my $newName = $self->session->url->urlize($form->process('newName') || $form->process('label'));
$newName =~ tr{-/}{}; $newName =~ tr{-/}{};
if ($fieldName) {
my $field = $self->getFieldConfig($fieldName);
if ($field->{isMailField}) {
$newName = $fieldName;
}
}
if (!$fieldName || $fieldName ne $newName) { if (!$fieldName || $fieldName ne $newName) {
my $i = ''; my $i = '';
while ($self->getFieldConfig($newName . $i)) { while ($self->getFieldConfig($newName . $i)) {