Fixed a few XHTML 1.0 related bugs

This commit is contained in:
Wouter van Oijen 2005-09-01 13:11:28 +00:00
parent ad6b484f0e
commit 01ad8fd12c
7 changed files with 26 additions and 26 deletions

View file

@ -229,8 +229,8 @@ sub www_editSettings {
-extras=>' onChange="alert(\''.$i18n->get("Illegal Warning").'\')" '
);
# auth settings
WebGUI::Style::setScript($session{config}{extrasURL}."/swapLayers.js",{language=>"Javascript"});
$tabform->getTab("auth")->raw('<script language="JavaScript" > var active="'.$session{setting}{authMethod}.'"; </script>');
WebGUI::Style::setScript($session{config}{extrasURL}."/swapLayers.js",{type=>"text/javascript"});
$tabform->getTab("auth")->raw('<script type="text/javascript" > var active="'.$session{setting}{authMethod}.'"; </script>');
my $options;
foreach (@{$session{config}{authMethods}}) {
$options->{$_} = $_;
@ -242,7 +242,7 @@ sub www_editSettings {
-value=>[$session{setting}{authMethod}],
-extras=>"onChange=\"active=operateHidden(this.options[this.selectedIndex].value,active)\""
);
my $jscript = '<script language="JavaScript">';
my $jscript = '<script type="text/javascript">';
foreach (@{$session{config}{authMethods}}) {
my $authInstance = WebGUI::Operation::Auth::getInstance($_,1);
$tabform->getTab("auth")->raw('<tr id="'.$_.'"><td colspan="2" width="100%"><table border=0 cellspacing=0 cellpadding=0 width="100%">'.$authInstance->editUserSettingsForm.'<tr><td width="304">&nbsp;</td><td width="496">&nbsp;</td></tr></table></td></tr>');