enable hoverHelp

This commit is contained in:
Colin Kuskie 2005-06-19 20:56:22 +00:00
parent bb563a217c
commit a95dfdd4a2

View file

@ -164,25 +164,34 @@ sub getEditForm {
my $tabform = $self->SUPER::getEditForm(); my $tabform = $self->SUPER::getEditForm();
#return $tabform; #return $tabform;
$tabform->getTab("properties")->HTMLArea( $tabform->getTab("properties")->HTMLArea(
-name=>"description", -label=>WebGUI::International::get(512,"Asset_Event"), -name=>"description",
-label=>WebGUI::International::get(512,"Asset_Event"),
-hoverHelp=>WebGUI::International::get('512 description',"Asset_Event"),
-value=>$self->getValue("description") -value=>$self->getValue("description")
); );
$tabform->getTab("properties")->dateTime( $tabform->getTab("properties")->dateTime(
-name=>"eventStartDate", -label=>WebGUI::International::get(513,"Asset_Event"), -name=>"eventStartDate",
-label=>WebGUI::International::get(513,"Asset_Event"),
-hoverHelp=>WebGUI::International::get('513 description',"Asset_Event"),
-extras=>'onBlur="this.form.eventEndDate.value=this.form.eventStartDate.value;this.form.until.value=this.form.eventStartDate.value;"', -extras=>'onBlur="this.form.eventEndDate.value=this.form.eventStartDate.value;this.form.until.value=this.form.eventStartDate.value;"',
-value=>$self->getValue("eventStartDate") -value=>$self->getValue("eventStartDate")
); );
$tabform->getTab("properties")->dateTime( $tabform->getTab("properties")->dateTime(
-name=>"eventEndDate", -label=>WebGUI::International::get(514,"Asset_Event"), -name=>"eventEndDate",
-label=>WebGUI::International::get(514,"Asset_Event"),
-hoverHelp=>WebGUI::International::get('514 description',"Asset_Event"),
-extras=>'onBlur="this.form.until.value=this.form.eventEndDate.value;"', -extras=>'onBlur="this.form.until.value=this.form.eventEndDate.value;"',
-value=>$self->getValue("eventEndDate") -value=>$self->getValue("eventEndDate")
); );
$tabform->getTab("properties")->text( $tabform->getTab("properties")->text(
-name=>"eventLocation", -label=>WebGUI::International::get(515,"Asset_Event"), -name=>"eventLocation",
-label=>WebGUI::International::get(515,"Asset_Event"),
-hoverHelp=>WebGUI::International::get('515 description',"Asset_Event"),
-value=>$self->getValue("eventLocation") -value=>$self->getValue("eventLocation")
); );
# $tabform->getTab("properties")->yesNo( # $tabform->getTab("properties")->yesNo(
# -name=>"allowRegistration", -label=>WebGUI::International::get(516,"Asset_Event"), # -name=>"allowRegistration",
# -label=>WebGUI::International::get(516,"Asset_Event"),
# -value=>$self->getValue("allowRegistration") # -value=>$self->getValue("allowRegistration")
# ); # );
# $tabform->getTab("properties")->yesNo( # $tabform->getTab("properties")->yesNo(
@ -255,6 +264,7 @@ sub getEditForm {
); );
$tabform->getTab("properties")->readOnly( $tabform->getTab("properties")->readOnly(
-label=>WebGUI::International::get(8,"Asset_Event"), -label=>WebGUI::International::get(8,"Asset_Event"),
-hoverHelp=>WebGUI::International::get('8 description',"Asset_Event"),
-value=>WebGUI::Form::integer({ -value=>WebGUI::Form::integer({
name=>"interval", name=>"interval",
defaultValue=>1 defaultValue=>1
@ -281,6 +291,7 @@ sub getEditForm {
-value=>$self->getValue("templateId"), -value=>$self->getValue("templateId"),
-namespace=>"EventsCalendar/Event", -namespace=>"EventsCalendar/Event",
-label=>WebGUI::International::get(530,"Asset_Event"), -label=>WebGUI::International::get(530,"Asset_Event"),
-hoverHelp=>WebGUI::International::get('530 description',"Asset_Event"),
-afterEdit=>'func=edit&wid='.$self->get("wobjectId") -afterEdit=>'func=edit&wid='.$self->get("wobjectId")
); );
# $tabform->getTab("display")->template( # $tabform->getTab("display")->template(