oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fixed a few XHTML 1.0 related bugs

Browse source
This commit is contained in:
Wouter van Oijen 2005-09-01 12:39:43 +00:00
parent 288e42f6d2
commit ad6b484f0e
13 changed files with 20 additions and 20 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lib/WebGUI/Asset/Shortcut.pm
View file

@ -416,7 +416,7 @@ sub _drawQueryBuilder {
# html
my $output;
$output .= '<script type="text/javascript" language="javascript" src="'.
$output .= '<script type="text/javascript" src="'.
$session{config}{extrasURL}.'/wobject/Shortcut/querybuilder.js"></script>';
$output .= '<link href="'.$session{config}{extrasURL}.
'/wobject/Shortcut/querybuilder.css" type="text/css" rel="stylesheet">';

4
lib/WebGUI/Asset/Wobject/DataForm.pm
View file

@ -119,7 +119,7 @@ sub _tonull {
sub _createTabInit {
my $id = shift;
my @tabCount = WebGUI::SQL->quickArray("select count(DataForm_tabId) from DataForm_tab where assetId=".quote($id));
my $output = '<script type="text/javascript" language="javascript"> var numberOfTabs = '.$tabCount[0].'; initTabs();</script>';
my $output = '<script type="text/javascript">var numberOfTabs = '.$tabCount[0].'; initTabs();</script>';
return $output;
}
@ -683,7 +683,7 @@ sub viewForm {
my $self = shift;
my $passedVars = shift;
WebGUI::Style::setLink($session{config}{extrasURL}.'/tabs/tabs.css', {"type"=>"text/css"});
WebGUI::Style::setScript($session{config}{extrasURL}.'/tabs/tabs.js', {"language"=>"JavaScript"});
WebGUI::Style::setScript($session{config}{extrasURL}.'/tabs/tabs.js', {"type"=>"text/javascript"});
my $var;
$var->{entryId} = $session{form}{entryId} if ($self->canEdit);
$var = $passedVars || $self->getRecordTemplateVars($var);

6
lib/WebGUI/Asset/Wobject/IndexedSearch.pm
View file

@ -186,10 +186,10 @@ sub getEditForm {
# Color picker for highlight colors
$tabform->getTab("display")->raw ( -value=>'
<SCRIPT LANGUAGE="Javascript" SRC="'.$session{config}{extrasURL}.'/wobject/IndexedSearch/ColorPicker2.js"></SCRIPT>
<SCRIPT LANGUAGE="JavaScript">
<script type="text/javascript" src="'.$session{config}{extrasURL}.'/wobject/IndexedSearch/ColorPicker2.js"></script>
<script type="text/javascript">
var cp = new ColorPicker("window");
</SCRIPT>'
</script>'
);
for (1..5) {
my $highlight = "highlight_$_";

6
lib/WebGUI/Asset/Wobject/Layout.pm
View file

@ -187,15 +187,15 @@ sub view {
if ($vars{showAdmin}) {
# under normal circumstances we don't put HTML stuff in our code, but this will make it much easier
# for end users to work with our templates
WebGUI::Style::setScript($session{config}{extrasURL}."/draggable.js",{ type=>"text/javascript", language=>"javascript" });
WebGUI::Style::setScript($session{config}{extrasURL}."/draggable.js",{ type=>"text/javascript" });
WebGUI::Style::setLink($session{config}{extrasURL}."/draggable.css",{ type=>"text/css", rel=>"stylesheet", media=>"all" });
$vars{"dragger.icon"} = WebGUI::Icon::dragIcon();
$vars{"dragger.init"} = '
<iframe id="dragSubmitter" style="display: none;" src="'.$session{config}{extrasURL}.'/spacer.gif"></iframe>
<script>
<script type="text/javascript">
dragable_init("'.$self->getUrl("func=setContentPositions;map=").'");
</script>
<style>
<style type="text/css">
.dragging, .empty {
background-image: url("'.$session{config}{extrasURL}.'/opaque.gif");
}

4
lib/WebGUI/Asset/Wobject/Navigation.pm
View file

@ -216,7 +216,7 @@ sub getEditForm {
-value=>$self->getValue("showUnprivilegedPages")
);
my $start = $self->getValue("startPoint");
$tabform->getTab("properties")->raw("<script language=\"javascript\" type=\"text/javascript\">
$tabform->getTab("properties")->raw("<script type=\"text/javascript\">
var displayNavDescendantEndPoint = true;
var displayNavAncestorEndPoint = true;
function toggleDescendantEndPoint () {
@ -288,7 +288,7 @@ sub getToolbar {
$toolbar = editIcon('func=edit'.$returnUrl,$self->get("url"));
}
my $i18n = WebGUI::International->new("Asset");
return '<script language="javascript" type="text/javascript">
return '<script type="text/javascript">
var contextMenu = new contextMenu_createWithImage("'.$self->getIcon(1).'","'.$self->getId.'","'.$self->getName.'");
contextMenu.addLink("'.$self->getUrl("func=copy").'","'.$i18n->get("copy").'");
contextMenu.addLink("'.$self->getUrl("func=manageAssets").'","'.$i18n->get("manage").'");

4
lib/WebGUI/Asset/Wobject/SQLReport.pm
View file

@ -154,7 +154,7 @@ sub getEditForm {
# Add toggleQuery javascript
$tabform->getTab("properties")->raw(qq|
<script language="javascript">
<script type="text/javascript">
function toggleQuery(Id) {
queryClass = "query" + Id;
var tr = document.getElementsByTagName("tr");
@ -215,7 +215,7 @@ sub getEditForm {
# Make empty query blocks invisible
if ($nr > 1 && ($self->get("dbQuery".$nr) eq "" || $self->get("dbQuery".($nr-1)) eq "")) {
$tabform->getTab("properties")->raw(qq|
<script language="javascript">
<script type="text/javascript">
toggleQuery('$nr');
</script>
|);

2
lib/WebGUI/Asset/Wobject/Survey.pm
View file

@ -1008,7 +1008,7 @@ sub www_editQuestion {
editIcon('func=editAnswer;qid='.$question->{Survey_questionId}.';aid='.$data{Survey_answerId}, $self->get("url")).
moveUpIcon('func=moveAnswerUp'.';qid='.$question->{Survey_questionId}.';aid='.$data{Survey_answerId}, $self->get("url")).
moveDownIcon('func=moveAnswerDown;qid='.$question->{Survey_questionId}.';aid='.$data{Survey_answerId}, $self->get("url")).
' '.$data{answer}.'<br>';
' '.$data{answer}.'<br />';
}
$sth->finish;
}

2
lib/WebGUI/AssetBranch.pm
View file

@ -121,7 +121,7 @@ sub www_editBranch {
title=>WebGUI::International::get(99,"Asset"),
currentUrl=>"Current URL"
}
})."<script type=\"text/javascript\" language=\"javascript\">
})."<script type=\"text/javascript\">
function toggleSpecificBaseUrl () {
if (document.getElementById('baseUrlBy').options[document.getElementById('baseUrlBy').selectedIndex].value == 'specifiedBase') {
document.getElementById('baseUrl').innerHTML='<input type=\"text\" name=\"baseUrl\" />';

2
lib/WebGUI/AssetClipboard.pm
View file

@ -318,7 +318,7 @@ WebGUI::Style::setLink($session{config}{extrasURL}.'/assetManager/assetManager.c
WebGUI::Style::setScript($session{config}{extrasURL}.'/assetManager/assetManager.js', {type=>"text/javascript"});
my $i18n = WebGUI::International->new("Asset");
my $output = "
<script type=\"text/javascript\" language=\"javascript\">
<script type=\"text/javascript\">
var assetManager = new AssetManager();
assetManager.AddColumn('".WebGUI::Form::checkbox({extras=>'onchange="toggleAssetListSelectAll(this.form);"'})."','','center','form');
assetManager.AddColumn('".$i18n->get("99")."','','left','');

2
lib/WebGUI/AssetTrash.pm
View file

@ -218,7 +218,7 @@ sub www_manageTrash {
WebGUI::Style::setScript($session{config}{extrasURL}.'/assetManager/assetManager.js', {type=>"text/javascript"});
my $i18n = WebGUI::International->new("Asset");
my $output = "
<script type=\"text/javascript\" language=\"javascript\">
<script type=\"text/javascript\">
var assetManager = new AssetManager();
assetManager.AddColumn('".WebGUI::Form::checkbox({extras=>'onchange="toggleAssetListSelectAll(this.form);"'})."','','center','form');
assetManager.AddColumn('".$i18n->get("99")."','','left','');

2
lib/WebGUI/HTMLForm.pm
View file

@ -167,7 +167,7 @@ Returns the HTML for this form object.
=cut
sub print {
return $_[0]->{_header}.$_[0]->{_data}.$_[0]->{_footer}.'<script language="JavaScript" type="text/javascript" src="'.$session{config}{extrasURL}.'/wz_tooltip.js"></script>';
return $_[0]->{_header}.$_[0]->{_data}.$_[0]->{_footer}.'<script type="text/javascript" src="'.$session{config}{extrasURL}.'/wz_tooltip.js"></script>';
}
#-------------------------------------------------------------------

2
lib/WebGUI/Macro/Spacer.pm
View file

@ -21,7 +21,7 @@ sub process {
@param = WebGUI::Macro::getParams($_[0]);
$width = $param[0] if defined $param[0];
$height = $param[1] if defined $param[1];
$output = '<img src="'.$session{config}{extrasURL}.'/spacer.gif"'.(defined $width?' width="'.$width.'"':'').(defined $height?' height="'.$height.'"':'').' border="0">';
$output = '<img src="'.$session{config}{extrasURL}.'/spacer.gif"'.(defined $width?' width="'.$width.'"':'').(defined $height?' height="'.$height.'"':'').' border="0" alt="" />';
return $output;
}

2
lib/WebGUI/TabForm.pm
View file

@ -245,7 +245,7 @@ sub print {
$output .= $form;
$output .= WebGUI::Form::formFooter();
$output .= '<script>var numberOfTabs = '.($i-1).'; initTabs();</script>';
$output .= '<script language="JavaScript" type="text/javascript" src="'.$session{config}{extrasURL}.'/wz_tooltip.js"></script>';
$output .= '<script type="text/javascript" src="'.$session{config}{extrasURL}.'/wz_tooltip.js"></script>';
return $output;
}