XHTML Bugfixes

This commit is contained in:
Wouter van Oijen 2006-02-10 21:21:03 +00:00
parent c68c65a504
commit 2b1c85370c
6 changed files with 9 additions and 9 deletions

View file

@ -78,14 +78,14 @@ sub getEditForm {
-name=>"eventStartDate",
-label=>$i18n->get(513),
-hoverHelp=>$i18n->get('Start Date description'),
-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")
);
$tabform->getTab("properties")->dateTime(
-name=>"eventEndDate",
-label=>$i18n->get(514),
-hoverHelp=>$i18n->get('End Date description'),
-extras=>'onBlur="this.form.until.value=this.form.eventEndDate.value;"',
-extras=>'onblur="this.form.until.value=this.form.eventEndDate.value;"',
-value=>$self->getValue("eventEndDate")
);
$tabform->getTab("properties")->text(

View file

@ -150,7 +150,7 @@ sub getEditForm {
-value=>WebGUI::Form::checkbox($self->session,{
checked=>$ancestorsChecked,
name=>"assetsToInclude",
extras=>'onChange="toggleAncestorEndPoint()"',
extras=>'onchange="toggleAncestorEndPoint()"',
value=>"ancestors"
}).$i18n->get('Ancestors').'<br />'
.WebGUI::Form::checkbox($self->session,{
@ -167,7 +167,7 @@ sub getEditForm {
checked=>$descendantsChecked,
name=>"assetsToInclude",
value=>"descendants",
extras=>'onChange="toggleDescendantEndPoint()"'
extras=>'onchange="toggleDescendantEndPoint()"'
}).$i18n->get('Descendants').'<br />'
.WebGUI::Form::checkbox($self->session,{
checked=>$pedigreeChecked,

View file

@ -108,7 +108,7 @@ Renders a URL field.
sub toHtml {
my $self = shift;
$self->session->style->setScript($self->session->config->get("extrasURL").'/addHTTP.js',{ type=>'text/javascript' });
$self->set("extras", $self->get('extras') . ' onBlur="addHTTP(this.form.'.$self->get("name").')"');
$self->set("extras", $self->get('extras') . ' onblur="addHTTP(this.form.'.$self->get("name").')"');
return $self->SUPER::toHtml;
}

View file

@ -125,7 +125,7 @@ The form's submission method. This defaults to "POST" and probably shouldn't be
If you want to add anything special to your form like javascript actions, or stylesheet information, you'd add it in here as follows:
'"name"="myForm" onChange="myForm.submit()"'
'"name"="myForm" onchange="myForm.submit()"'
=head3 enctype

View file

@ -258,7 +258,7 @@ sub www_editSettings {
-label=>$i18n->get("Enable passive profiling"),
-hoverHelp=>$i18n->get("Enable passive profiling description"),
-value=>$session->setting->get("passiveProfilingEnabled"),
-extras=>' onChange="alert(\''.$i18n->get("Illegal Warning").'\')" '
-extras=>'onchange="alert(\''.$i18n->get("Illegal Warning").'\')" '
);
# auth settings
$session->style->setScript($session->config->get("extrasURL")."/swapLayers.js",{type=>"text/javascript"});
@ -273,7 +273,7 @@ sub www_editSettings {
-label=>$i18n->get(164),
-hoverHelp=>$i18n->get('164 description'),
-value=>[$session->setting->get("authMethod")],
-extras=>"onChange=\"active=operateHidden(this.options[this.selectedIndex].value,active)\""
-extras=>"onchange=\"active=operateHidden(this.options[this.selectedIndex].value,active)\""
);
foreach (@{$session->config->get("authMethods")}) {
my $authInstance = WebGUI::Operation::Auth::getInstance($session,$_,1);

View file

@ -337,7 +337,7 @@ sub www_editUser {
-options=>$options,
-label=>$i18n->get(164),
-value=>$u->authMethod,
-extras=>"onChange=\"active=operateHidden(this.options[this.selectedIndex].value,active)\""
-extras=>"onchange=\"active=operateHidden(this.options[this.selectedIndex].value,active)\""
);
foreach (@{$session->config->get("authMethods")}) {
my $authInstance = WebGUI::Operation::Auth::getInstance($session,$_,$u->userId);