removed comma in qw
This commit is contained in:
parent
5628fcbdd6
commit
b6f9315976
1 changed files with 1 additions and 1 deletions
|
|
@ -949,7 +949,7 @@ sub fieldType {
|
|||
my ($output);
|
||||
my ($self, @p) = @_;
|
||||
my ($name, $types, $label, $value, $size, $multiple, $extras, $subtext, $uiLevel, $defaultValue) =
|
||||
rearrange([qw(name types label value size multiple extras subtext uiLevel, $defaultValue)], @p);
|
||||
rearrange([qw(name types label value size multiple extras subtext uiLevel $defaultValue)], @p);
|
||||
if (_uiLevelChecksOut($uiLevel)) {
|
||||
$output = WebGUI::Form::fieldType({
|
||||
"name"=>$name,
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue