hover help

This commit is contained in:
Colin Kuskie 2005-07-08 04:47:16 +00:00
parent eb3115d3f9
commit 0780aacfe5
15 changed files with 742 additions and 332 deletions

View file

@ -262,38 +262,57 @@ sub www_editGroup {
$f = WebGUI::HTMLForm->new;
$f->hidden("op","editGroupSave");
$f->hidden("gid",$session{form}{gid});
$f->readOnly($g->groupId,WebGUI::International::get(379));
$f->text("groupName",WebGUI::International::get(84),$g->name);
$f->textarea("description",WebGUI::International::get(85),$g->description);
$f->readOnly(
-label => WebGUI::International::get(379),
-value => $g->groupId,
);
$f->text(
-name => "groupName",
-label => WebGUI::International::get(84),
-hoverHelp => WebGUI::International::get('84 description'),
-value => $g->name,
);
$f->textarea(
-name => "description",
-label => WebGUI::International::get(85),
-hoverHelp => WebGUI::International::get('85 description'),
-value => $g->description,
);
$f->interval(
-name=>"expireOffset",
-label=>WebGUI::International::get(367),
-hoverHelp=>WebGUI::International::get('367 description'),
-value=>$g->expireOffset
);
$f->yesNo(
-name=>"expireNotify",
-value=>$g->expireNotify,
-label=>WebGUI::International::get(865)
-hoverHelp=>WebGUI::International::get('865 description')
);
$f->integer(
-name=>"expireNotifyOffset",
-value=>$g->expireNotifyOffset,
-label=>WebGUI::International::get(864)
-hoverHelp=>WebGUI::International::get('864 description')
);
$f->textarea(
-name=>"expireNotifyMessage",
-value=>$g->expireNotifyMessage,
-label=>WebGUI::International::get(866)
-hoverHelp=>WebGUI::International::get('866 description')
);
$f->integer(
-name=>"deleteOffset",
-value=>$g->deleteOffset,
-label=>WebGUI::International::get(863)
-hoverHelp=>WebGUI::International::get('863 description')
);
if ($session{setting}{useKarma}) {
$f->integer(
-name=>"karmaThreshold",
-label=>WebGUI::International::get(538),
-hoverHelp=>WebGUI::International::get('538 description'),
-value=>$g->karmaThreshold
);
}
@ -301,11 +320,13 @@ sub www_editGroup {
-name=>"ipFilter",
-value=>$g->ipFilter,
-label=>WebGUI::International::get(857)
-hoverHelp=>WebGUI::International::get('857 description')
);
$f->textarea(
-name=>"scratchFilter",
-value=>$g->scratchFilter,
-label=>WebGUI::International::get(945)
-hoverHelp=>WebGUI::International::get('945 description')
);
if ($session{form}{gid} eq "3") {
$f->hidden(
@ -321,11 +342,13 @@ sub www_editGroup {
-name=>"autoAdd",
-value=>$g->autoAdd,
-label=>WebGUI::International::get(974)
-hoverHelp=>WebGUI::International::get('974 description')
);
$f->yesNo(
-name=>"autoDelete",
-value=>$g->autoDelete,
-label=>WebGUI::International::get(975)
-hoverHelp=>WebGUI::International::get('975 description')
);
}
$f->databaseLink(
@ -335,26 +358,31 @@ sub www_editGroup {
-name=>"dbQuery",
-value=>$g->dbQuery,
-label=>WebGUI::International::get(1005)
-hoverHelp=>WebGUI::International::get('1005 description')
);
$f->text(
-name=>"ldapGroup",
-label=>WebGUI::International::get("LDAPLink_ldapGroup","AuthLDAP"),
-hoverHelp=>WebGUI::International::get("LDAPLink_ldapGroup","AuthLDAP"),
-value=>$g->ldapGroup
);
$f->text(
-name=>"ldapGroupProperty",
-label=>WebGUI::International::get("LDAPLink_ldapGroupProperty","AuthLDAP"),
-hoverHelp=>WebGUI::International::get("LDAPLink_ldapGroupProperty","AuthLDAP"),
-value=>$g->ldapGroupProperty,
-defaultValue=>"member"
);
$f->text(
-name=>"ldapRecursiveProperty",
-label=>WebGUI::International::get("LDAPLink_ldapRecursiveProperty","AuthLDAP"),
-hoverHelp=>WebGUI::International::get("LDAPLink_ldapRecursiveProperty","AuthLDAP"),
-value=>$g->ldapRecursiveProperty
);
$f->interval(
-name=>"dbCacheTimeout",
-label=>WebGUI::International::get(1004),
-hoverHelp=>WebGUI::International::get('1004 description'),
-value=>$g->dbCacheTimeout
);
$f->submit;

View file

@ -36,15 +36,6 @@ sub _link {
return WebGUI::URL::page('op=viewHelp&hid='.WebGUI::URL::escape($_[0]).'&namespace='.$_[1]);
}
#-------------------------------------------------------------------
sub _seeAlso {
my $related = shift;
my $namespace = shift;
my $output;
return $output;
}
#-------------------------------------------------------------------
sub www_viewHelp {
return WebGUI::Privilege::insufficient() unless (WebGUI::Grouping::isInGroup(7));

View file

@ -90,41 +90,48 @@ sub www_editProduct {
$f->text(
-name => 'title',
-label => $i18n->get('title'),
-hoverHelp => $i18n->get('title description'),
-value => $session{form}{title} || $product->{title},
-maxlength => 255,
);
$f->textarea(
-name => 'description',
-label => $i18n->get('description'),
-hoverHelp => $i18n->get('description description'),
-value => $session{form}{decsription} || $product->{description},
);
$f->float(
-name => 'price',
-label => $i18n->get('price'),
-hoverHelp => $i18n->get('price description'),
-value => $session{form}{price} || $product->{price},
-maxlength => 13,
);
$f->float(
-name => 'weight',
-label => $i18n->get('weight'),
-hoverHelp => $i18n->get('weight description'),
-value => $session{form}{weight} || $product->{weight},
-maxlength => 9,
);
$f->text(
-name => 'sku',
-label => $i18n->get('sku'),
-hoverHelp => $i18n->get('sku description'),
-value => $session{form}{sku} || $product->{SKU},
-maxlength => 64,
);
$f->template(
-name => 'templateId',
-label => $i18n->get('template'),
-hoverHelp => $i18n->get('template description'),
-value => $session{form}{templateId} || $product->{templateId},
-namespace => 'Commerce/Product',
);
$f->text(
-name => 'skuTemplate',
-label => $i18n->get('sku template'),
-hoverHelp => $i18n->get('sku template description'),
-value => $session{form}{skuTemplate} || $product->{skuTemplate},
-maxlength => 255,
);