setup for hover help

This commit is contained in:
Colin Kuskie 2005-07-29 03:42:58 +00:00
parent 4c8ff049cc
commit 3015b7877b

View file

@ -410,19 +410,23 @@ sub www_editGrouping {
$f->readOnly(
-value => $u->username,
-label => WebGUI::International::get(50),
-hoverHelp => WebGUI::International::get('50 description'),
);
$f->readOnly(
-value => $g->name,
-label => WebGUI::International::get(84),
-hoverHelp => WebGUI::International::get('84 description'),
);
$f->date(
-name => "expireDate",
-label => WebGUI::International::get(369),
-hoverHelp => WebGUI::International::get('369 description'),
-value => WebGUI::Grouping::userGroupExpireDate($session{form}{uid},$session{form}{gid}),
);
$f->yesNo(
-name=>"groupAdmin",
-label=>WebGUI::International::get(977),
-hoverHelp=>WebGUI::International::get('977 description'),
-value=>WebGUI::Grouping::userGroupAdmin($session{form}{uid},$session{form}{gid})
);
$f->submit;