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

Added more field types to profile fields.

Browse source
This commit is contained in:
JT Smith 2003-05-10 21:54:15 +00:00
parent 9b7d273b6d
commit f131a648c2
2 changed files with 7 additions and 19 deletions
Download patch file Download diff file Expand all files Collapse all files

16
lib/WebGUI/Operation/ProfileSettings.pm
View file

@ -197,19 +197,11 @@ sub www_editProfileField {
-label=>WebGUI::International::get(474,"WebGUI/Profile"),
-value=>$data{required}
);
tie %hash, 'Tie::IxHash';
%hash = ( 'text'=>WebGUI::International::get(475),
'textarea'=>WebGUI::International::get(476),
'HTMLArea'=>WebGUI::International::get(477),
'url'=>WebGUI::International::get(478),
'date'=>WebGUI::International::get(479),
'email'=>WebGUI::International::get(480),
'phone'=>WebGUI::International::get(481),
'integer'=>WebGUI::International::get(482),
'yesNo'=>WebGUI::International::get(483),
'select'=>WebGUI::International::get(484)
$f->fieldType(
-name=>"dataType",
-label=>WebGUI::International::get(486),
-value=>[$data{dataType} || "text"]
);
$f->select("dataType",\%hash,WebGUI::International::get(486),[$data{dataType}]);
$f->textarea("dataValues",WebGUI::International::get(487),$data{dataValues});
$f->textarea("dataDefault",WebGUI::International::get(488),$data{dataDefault});
tie %hash, 'Tie::CPHash';