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

fix for SQLForm 0 values in key/value pairs

Browse source
This commit is contained in:
Colin Kuskie 2007-02-05 17:52:02 +00:00
parent d1ede96e63
commit 3b6fdee0a9
2 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lib/WebGUI/Asset/Wobject/SQLForm.pm
View file

@ -721,9 +721,8 @@ sub _getFieldProperties {
@keys = split(/[\r\n]+/, $definition{formPopulationKeys});
@values = split(/[\r\n]+/, $definition{formPopulationValues});
while (my $key = shift(@keys)) {
$options->{$key} = shift(@values);
}
##Assign all values to keys in an ordered, 1:1 way
@{ $options }{@keys} = @values;
}