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

adding LDAP link to group

Browse source
This commit is contained in:
Frank Dillon 2006-06-23 01:50:21 +00:00
parent 6e734b900f
commit 76af04f71b
1 changed files with 12 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

12
lib/WebGUI/Operation/Group.pm
View file

@ -377,6 +377,17 @@ sub www_editGroup {
-label=>$i18n->get(1005), -label=>$i18n->get(1005),
-hoverHelp=>$i18n->get('1005 description'), -hoverHelp=>$i18n->get('1005 description'),
); );
tie my %links, "Tie::IxHash";
%links = %{WebGUI::LDAPLink->getList($session)};
%links = (""=>$i18n->get("noldaplink"),%links);
$f->selectBox(
-name=>"ldapLinkId",
-label=>$i18n->get("ldapConnection","AuthLDAP"),
-hoverHelp=>$i18n->get("ldapConnection description","AuthLDAP"),
-options=>\%links,
-value=>[$g->ldapLinkId]
);
$f->text( $f->text(
-name=>"ldapGroup", -name=>"ldapGroup",
-label=>$i18n->get("LDAPLink_ldapGroup","AuthLDAP"), -label=>$i18n->get("LDAPLink_ldapGroup","AuthLDAP"),
@ -427,6 +438,7 @@ sub www_editGroupSave {
$g->databaseLinkId($session->form->process("databaseLinkId")); $g->databaseLinkId($session->form->process("databaseLinkId"));
$g->dbQuery($session->form->process("dbQuery")); $g->dbQuery($session->form->process("dbQuery"));
$g->groupCacheTimeout($session->form->interval("groupCacheTimeout")); $g->groupCacheTimeout($session->form->interval("groupCacheTimeout"));
$g->ldapLinkId($session->form->selectBox("ldapLinkId"));
$g->ldapGroup($session->form->text("ldapGroup")); $g->ldapGroup($session->form->text("ldapGroup"));
$g->ldapGroupProperty($session->form->text("ldapGroupProperty")); $g->ldapGroupProperty($session->form->text("ldapGroupProperty"));
$g->ldapRecursiveProperty($session->form->text("ldapRecursiveProperty")); $g->ldapRecursiveProperty($session->form->text("ldapRecursiveProperty"));