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

some bug fixes and the new group of groups hierarchy viewer in the group manager

Browse source
This commit is contained in:
JT Smith 2005-03-03 03:33:09 +00:00
parent 8bd4f8274a
commit c29c81be23
5 changed files with 54 additions and 34 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -172,7 +172,8 @@ sub www_editProfileField {
$f->fieldType(
-name=>"dataType",
-label=>WebGUI::International::get(486),
-value=>[$data{dataType} || "text"]
-value=>$data{dataType},
-defaultValue=>"text"
);
$f->textarea("dataValues",WebGUI::International::get(487),$data{dataValues});
$f->textarea("dataDefault",WebGUI::International::get(488),$data{dataDefault});
@ -218,16 +219,17 @@ sub www_editProfileFieldSave {
WebGUI::SQL->write("insert into userProfileField (fieldName, sequenceNumber, protected)
values (".quote($session{form}{fid}).", ".($sequenceNumber+1).", 0)");
}
WebGUI::SQL->write("update userProfileField set
fieldLabel=".quote($session{form}{fieldLabel}).",
visible=$session{form}{visible},
required=$session{form}{required},
editable=$session{form}{editable},
dataType=".quote($session{form}{dataType}).",
dataValues=".quote($session{form}{dataValues}).",
dataDefault=".quote($session{form}{dataDefault}).",
profileCategoryId=".quote($session{form}{profileCategoryId})."
where fieldName=".quote($session{form}{fid}));
WebGUI::SQL->setRow("userProfileField","fieldName",{
fieldLabel=>$session{form}{fieldLabel},
visible=>$session{form}{visible},
required=>$session{form}{required},
editable=>$session{form}{editable},
dataType=>$session{form}{dataType},
dataValues=>$session{form}{dataValues},
dataDefault=>$session{form}{dataDefault},
profileCategoryId=>$session{form}{profileCategoryId},
fieldName=>$session{form}{fid}
});
return www_editProfileSettings();
}