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

DataForm was passing parameters to Form/*.pm that do not exist anymore. Updated rows and columns to be height and width

Browse source
This commit is contained in:
Colin Kuskie 2006-07-15 04:34:36 +00:00
parent 8f4dcfe900
commit 253dc4a533
2 changed files with 6 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -35,12 +35,12 @@ sub _createField {
$param{name} = "field_".$data->{sequenceNumber} if ($param{name} eq ""); # Empty fieldname not allowed
my $name = $param{name};
$name =~ s/\^.*?\;//gs ; # remove macro's from user input
$param{value} = $data->{value};
$param{size} = $data->{width};
$param{rows} = $data->{rows} || 5;
$param{columns} = $data->{width};
$param{vertical} = $data->{vertical};
$param{value} = $data->{value};
$param{size} = $data->{width};
$param{height} = $data->{rows};
$param{width} = $data->{width};
$param{extras} = $data->{extras};
$param{vertical} = $data->{vertical};
if ($data->{type} eq "checkbox") {
$param{value} = ($data->{defaultValue} =~ /checked/i) ? 1 : "";