webgui/docs/upgrades/upgrade_6.7.1-6.7.2.pl
2005-08-26 15:40:57 +00:00

925 lines
23 KiB
Perl

use lib "../../lib";
use strict;
use Getopt::Long;
use WebGUI::Session;
use WebGUI::SQL;
use WebGUI::Asset;
my $toVersion = "6.7.2";
my $configFile;
my $quiet;
start();
fixTimeFields();
fixSpelling();
fixCSTemplate();
speedUpAdminConsole();
removeOldFiles();
updatePageTemplates();
fixSurveyTemplate();
finish();
#-------------------------------------------------
sub fixSurveyTemplate {
print "\tFixing survey template.\n" unless ($quiet);
my $template = <<END;
<a name="<tmpl_var assetId>"></a>
<tmpl_if session.var.adminOn>
<p><tmpl_var controls></p>
</tmpl_if>
<tmpl_if displayTitle>
<h1><tmpl_var title></h1>
</tmpl_if>
<tmpl_if description>
<tmpl_var description><p />
</tmpl_if>
<tmpl_if user.canTakeSurvey>
<tmpl_if response.isComplete>
<tmpl_if mode.isSurvey>
<tmpl_var thanks.survey.label>
<tmpl_else>
<tmpl_var thanks.quiz.label>
<div align="center">
<b><tmpl_var questions.correct.count.label>:</b> <tmpl_var questions.correct.count> / <tmpl_var questions.total>
<br />
<b><tmpl_var questions.correct.percent.label>:</b><tmpl_var questions.correct.percent>%
</div>
</tmpl_if>
<tmpl_if user.canRespondAgain>
<br /> <br /> <a href="<tmpl_var start.newResponse.url>"><tmpl_var start.newResponse.label></a>
</tmpl_if>
<tmpl_else>
<tmpl_if response.id>
<tmpl_var form.header>
<table width="100%" cellpadding="3" cellspacing="0" border="0" class="content">
<tr>
<td valign="top">
<tmpl_loop question_loop>
<p><tmpl_var question.question></p>
<tmpl_var question.answer.label><br />
<tmpl_var question.answer.field><br />
<br />
<tmpl_if question.allowComment>
<tmpl_var question.comment.label><br />
<tmpl_var question.comment.field><br />
</tmpl_if>
</tmpl_loop>
</td>
<td valign="top" nowrap="1">
<b><tmpl_var questions.sofar.label>:</b> <tmpl_var questions.sofar.count> / <tmpl_var questions.total> <br />
<tmpl_unless mode.isSurvey>
<b><tmpl_var questions.correct.count.label>:</b> <tmpl_var questions.correct.count> / <tmpl_var questions.sofar.count><br />
<b><tmpl_var questions.correct.percent.label>:</b><tmpl_var questions.correct.percent>% / 100%<br />
</tmpl_unless>
</td>
</tr>
</table>
<div align="center"><tmpl_var form.submit></div>
<tmpl_var form.footer>
<tmpl_else>
<a href="<tmpl_var start.newResponse.url>"><tmpl_var start.newResponse.label></a>
</tmpl_if>
</tmpl_if>
<tmpl_else>
<tmpl_if mode.isSurvey>
<tmpl_var survey.noprivs.label>
<tmpl_else>
<tmpl_var quiz.noprivs.label>
</tmpl_if>
</tmpl_if>
<br />
<br />
<tmpl_if user.canViewReports>
<a href="<tmpl_var report.gradebook.url>"><tmpl_var report.gradebook.label></a>
&bull;
<a href="<tmpl_var report.overview.url>"><tmpl_var report.overview.label></a>
&bull;
<a href="<tmpl_var delete.all.responses.url>"><tmpl_var delete.all.responses.label></a>
<br />
<a href="<tmpl_var export.answers.url>"><tmpl_var export.answers.label></a>
&bull;
<a href="<tmpl_var export.questions.url>"><tmpl_var export.questions.label></a>
&bull;
<a href="<tmpl_var export.responses.url>"><tmpl_var export.responses.label></a>
&bull;
<a href="<tmpl_var export.composite.url>"><tmpl_var export.composite.label></a>
</tmpl_if>
<tmpl_if session.var.adminOn>
<p>
<a href="<tmpl_var section.add.url>"><tmpl_var section.add.label></a>
</p>
<p>
<a href="<tmpl_var question.add.url>"><tmpl_var question.add.label></a>
</p>
<tmpl_loop section.edit_loop>
<tmpl_var section.edit.controls>
<tmpl_var section.edit.sectionName><br /><br />
<tmpl_loop section.questions_loop>
&nbsp;&nbsp;<tmpl_var question.edit.controls>
<tmpl_var question.edit.question>
<br />
</tmpl_loop>
</tmpl_loop>
</tmpl_if>
END
WebGUI::Asset->new("PBtmpl0000000000000061","WebGUI::Asset::Template")->addRevision({template=>$template})->commit;
}
#-------------------------------------------------
sub updatePageTemplates {
print "\tMaking page templates float better in IE.\n" unless ($quiet);
# news
my $template = <<END;
<a href="<tmpl_var assetId>"></a>
<tmpl_if displayTitle>
<h1><tmpl_var title></h1>
</tmpl_if>
<tmpl_if description>
<p><tmpl_var description></p>
</tmpl_if>
<tmpl_if showAdmin>
<p><tmpl_var controls></p>
</tmpl_if>
<!-- begin position 1 -->
<div>
<tmpl_if showAdmin>
<table border="0" id="position1" class="content"><tbody>
</tmpl_if>
<tmpl_loop position1_loop>
<tmpl_if showAdmin>
<tr id="td<tmpl_var id>">
<td><div id="td<tmpl_var id>_div" class="dragable">
</tmpl_if>
<div class="content"><tmpl_var dragger.icon><tmpl_var content></div>
<tmpl_if showAdmin>
</div></td>
</tr>
</tmpl_if>
</tmpl_loop>
<tmpl_if showAdmin>
</tbody></table>
</tmpl_if>
</div>
<!-- end position 1 -->
<div style="clear: both;">&nbsp;</div>
<div>
<!-- begin position 2 -->
<div style="width: 49%; float: left;">
<tmpl_if showAdmin>
<table border="0" id="position2" class="content"><tbody>
</tmpl_if>
<tmpl_loop position2_loop>
<tmpl_if showAdmin>
<tr id="td<tmpl_var id>">
<td><div id="td<tmpl_var id>_div" class="dragable">
</tmpl_if>
<div class="content"><tmpl_var dragger.icon><tmpl_var content></div>
<tmpl_if showAdmin>
</div></td>
</tr>
</tmpl_if>
</tmpl_loop>
<tmpl_if showAdmin>
</tbody></table>
</tmpl_if>
</div>
<!-- end position 2 -->
<!-- begin position 3 -->
<div style="width: 49%; float: left;">
<tmpl_if showAdmin>
<table border="0" id="position3" class="content"><tbody>
</tmpl_if>
<tmpl_loop position3_loop>
<tmpl_if showAdmin>
<tr id="td<tmpl_var id>">
<td><div id="td<tmpl_var id>_div" class="dragable">
</tmpl_if>
<div class="content"><tmpl_var dragger.icon><tmpl_var content></div>
<tmpl_if showAdmin>
</div></td>
</tr>
</tmpl_if>
</tmpl_loop>
<tmpl_if showAdmin>
</tbody></table>
</tmpl_if>
</div>
<!-- end position 3 -->
</div>
<div style="clear: both;">&nbsp;</div>
<!-- begin position 4 -->
<div>
<tmpl_if showAdmin>
<table border="0" id="position4" class="content"><tbody>
</tmpl_if>
<tmpl_loop position4_loop>
<tmpl_if showAdmin>
<tr id="td<tmpl_var id>">
<td><div id="td<tmpl_var id>_div" class="dragable">
</tmpl_if>
<div class="content"><tmpl_var dragger.icon><tmpl_var content></div>
<tmpl_if showAdmin>
</div></td>
</tr>
</tmpl_if>
</tmpl_loop>
<tmpl_if showAdmin>
</tbody></table>
</tmpl_if>
</div>
<!-- end position 4 -->
<tmpl_if showAdmin>
<table><tr id="blank" class="hidden"><td><div><div class="empty">&nbsp;</div></div></td></tr></table>
<tmpl_var dragger.init>
</tmpl_if>
END
WebGUI::Asset->new("PBtmpl0000000000000094","WebGUI::Asset::Template")->addRevision({template=>$template})->commit;
# side by side
$template = <<END;
<a href="<tmpl_var assetId>"></a>
<tmpl_if displayTitle>
<h1><tmpl_var title></h1>
</tmpl_if>
<tmpl_if description>
<p><tmpl_var description></p>
</tmpl_if>
<tmpl_if showAdmin>
<p><tmpl_var controls></p>
</tmpl_if>
<div style="clear: both;">&nbsp;</div>
<div>
<!-- begin position 1 -->
<div style="width: 49%; float: left;">
<tmpl_if showAdmin>
<table border="0" id="position1" class="content"><tbody>
</tmpl_if>
<tmpl_loop position1_loop>
<tmpl_if showAdmin>
<tr id="td<tmpl_var id>">
<td><div id="td<tmpl_var id>_div" class="dragable">
</tmpl_if>
<div class="content"><tmpl_var dragger.icon><tmpl_var content></div>
<tmpl_if showAdmin>
</div></td>
</tr>
</tmpl_if>
</tmpl_loop>
<tmpl_if showAdmin>
</tbody></table>
</tmpl_if>
</div>
<!-- end position 1 -->
<!-- begin position 2 -->
<div style="width: 49%; float: left;">
<tmpl_if showAdmin>
<table border="0" id="position2" class="content"><tbody>
</tmpl_if>
<tmpl_loop position2_loop>
<tmpl_if showAdmin>
<tr id="td<tmpl_var id>">
<td><div id="td<tmpl_var id>_div" class="dragable">
</tmpl_if>
<div class="content"><tmpl_var dragger.icon><tmpl_var content></div>
<tmpl_if showAdmin>
</div></td>
</tr>
</tmpl_if>
</tmpl_loop>
<tmpl_if showAdmin>
</tbody></table>
</tmpl_if>
</div>
<!-- end position 2 -->
</div>
<div style="clear: both;">&nbsp;</div>
<tmpl_if showAdmin>
<table><tr id="blank" class="hidden"><td><div><div class="empty">&nbsp;</div></div></td></tr></table>
<tmpl_var dragger.init>
</tmpl_if>
END
WebGUI::Asset->new("PBtmpl0000000000000135","WebGUI::Asset::Template")->addRevision({template=>$template})->commit;
# left column
$template = <<END;
<a href="<tmpl_var assetId>"></a>
<tmpl_if displayTitle>
<h1><tmpl_var title></h1>
</tmpl_if>
<tmpl_if description>
<p><tmpl_var description></p>
</tmpl_if>
<tmpl_if showAdmin>
<p><tmpl_var controls></p>
</tmpl_if>
<div style="clear: both;">&nbsp;</div>
<div>
<!-- begin position 1 -->
<div style="width: 33%; float: left;">
<tmpl_if showAdmin>
<table border="0" id="position1" class="content"><tbody>
</tmpl_if>
<tmpl_loop position1_loop>
<tmpl_if showAdmin>
<tr id="td<tmpl_var id>">
<td><div id="td<tmpl_var id>_div" class="dragable">
</tmpl_if>
<div class="content"><tmpl_var dragger.icon><tmpl_var content></div>
<tmpl_if showAdmin>
</div></td>
</tr>
</tmpl_if>
</tmpl_loop>
<tmpl_if showAdmin>
</tbody></table>
</tmpl_if>
</div>
<!-- end position 1 -->
<!-- begin position 2 -->
<div style="width: 65%; float: left;">
<tmpl_if showAdmin>
<table border="0" id="position2" class="content"><tbody>
</tmpl_if>
<tmpl_loop position2_loop>
<tmpl_if showAdmin>
<tr id="td<tmpl_var id>">
<td><div id="td<tmpl_var id>_div" class="dragable">
</tmpl_if>
<div class="content"><tmpl_var dragger.icon><tmpl_var content></div>
<tmpl_if showAdmin>
</div></td>
</tr>
</tmpl_if>
</tmpl_loop>
<tmpl_if showAdmin>
</tbody></table>
</tmpl_if>
</div>
<!-- end position 2 -->
</div>
<div style="clear: both;">&nbsp;</div>
<tmpl_if showAdmin>
<table><tr id="blank" class="hidden"><td><div><div class="empty">&nbsp;</div></div></td></tr></table>
<tmpl_var dragger.init>
</tmpl_if>
END
WebGUI::Asset->new("PBtmpl0000000000000125","WebGUI::Asset::Template")->addRevision({template=>$template})->commit;
# right column
$template = <<END;
<a href="<tmpl_var assetId>"></a>
<tmpl_if displayTitle>
<h1><tmpl_var title></h1>
</tmpl_if>
<tmpl_if description>
<p><tmpl_var description></p>
</tmpl_if>
<tmpl_if showAdmin>
<p><tmpl_var controls></p>
</tmpl_if>
<div style="clear: both;">&nbsp;</div>
<div>
<!-- begin position 1 -->
<div style="width: 65%; float: left;">
<tmpl_if showAdmin>
<table border="0" id="position1" class="content"><tbody>
</tmpl_if>
<tmpl_loop position1_loop>
<tmpl_if showAdmin>
<tr id="td<tmpl_var id>">
<td><div id="td<tmpl_var id>_div" class="dragable">
</tmpl_if>
<div class="content"><tmpl_var dragger.icon><tmpl_var content></div>
<tmpl_if showAdmin>
</div></td>
</tr>
</tmpl_if>
</tmpl_loop>
<tmpl_if showAdmin>
</tbody></table>
</tmpl_if>
</div>
<!-- end position 1 -->
<!-- begin position 2 -->
<div style="width: 33%; float: left;">
<tmpl_if showAdmin>
<table border="0" id="position2" class="content"><tbody>
</tmpl_if>
<tmpl_loop position2_loop>
<tmpl_if showAdmin>
<tr id="td<tmpl_var id>">
<td><div id="td<tmpl_var id>_div" class="dragable">
</tmpl_if>
<div class="content"><tmpl_var dragger.icon><tmpl_var content></div>
<tmpl_if showAdmin>
</div></td>
</tr>
</tmpl_if>
</tmpl_loop>
<tmpl_if showAdmin>
</tbody></table>
</tmpl_if>
</div>
<!-- end position 2 -->
</div>
<div style="clear: both;">&nbsp;</div>
<tmpl_if showAdmin>
<table><tr id="blank" class="hidden"><td><div><div class="empty">&nbsp;</div></div></td></tr></table>
<tmpl_var dragger.init>
</tmpl_if>
END
WebGUI::Asset->new("PBtmpl0000000000000131","WebGUI::Asset::Template")->addRevision({template=>$template})->commit;
# one over three
$template = <<END;
<a href="<tmpl_var assetId>"></a>
<tmpl_if displayTitle>
<h1><tmpl_var title></h1>
</tmpl_if>
<tmpl_if description>
<p><tmpl_var description></p>
</tmpl_if>
<tmpl_if showAdmin>
<p><tmpl_var controls></p>
</tmpl_if>
<!-- begin position 1 -->
<div>
<tmpl_if showAdmin>
<table border="0" id="position1" class="content"><tbody>
</tmpl_if>
<tmpl_loop position1_loop>
<tmpl_if showAdmin>
<tr id="td<tmpl_var id>">
<td><div id="td<tmpl_var id>_div" class="dragable">
</tmpl_if>
<div class="content"><tmpl_var dragger.icon><tmpl_var content></div>
<tmpl_if showAdmin>
</div></td>
</tr>
</tmpl_if>
</tmpl_loop>
<tmpl_if showAdmin>
</tbody></table>
</tmpl_if>
</div>
<!-- end position 1 -->
<div style="clear: both;">&nbsp;</div>
<div>
<!-- begin position 2 -->
<div style="width: 32%; float: left;">
<tmpl_if showAdmin>
<table border="0" id="position2" class="content"><tbody>
</tmpl_if>
<tmpl_loop position2_loop>
<tmpl_if showAdmin>
<tr id="td<tmpl_var id>">
<td><div id="td<tmpl_var id>_div" class="dragable">
</tmpl_if>
<div class="content"><tmpl_var dragger.icon><tmpl_var content></div>
<tmpl_if showAdmin>
</div></td>
</tr>
</tmpl_if>
</tmpl_loop>
<tmpl_if showAdmin>
</tbody></table>
</tmpl_if>
</div>
<!-- end position 2 -->
<!-- begin position 3 -->
<div style="width: 33%; float: left;">
<tmpl_if showAdmin>
<table border="0" id="position3" class="content"><tbody>
</tmpl_if>
<tmpl_loop position3_loop>
<tmpl_if showAdmin>
<tr id="td<tmpl_var id>">
<td><div id="td<tmpl_var id>_div" class="dragable">
</tmpl_if>
<div class="content"><tmpl_var dragger.icon><tmpl_var content></div>
<tmpl_if showAdmin>
</div></td>
</tr>
</tmpl_if>
</tmpl_loop>
<tmpl_if showAdmin>
</tbody></table>
</tmpl_if>
</div>
<!-- end position 3 -->
<!-- begin position 4 -->
<div style="width: 32%; float: left;">
<tmpl_if showAdmin>
<table border="0" id="position4" class="content"><tbody>
</tmpl_if>
<tmpl_loop position4_loop>
<tmpl_if showAdmin>
<tr id="td<tmpl_var id>">
<td><div id="td<tmpl_var id>_div" class="dragable">
</tmpl_if>
<div class="content"><tmpl_var dragger.icon><tmpl_var content></div>
<tmpl_if showAdmin>
</div></td>
</tr>
</tmpl_if>
</tmpl_loop>
<tmpl_if showAdmin>
</tbody></table>
</tmpl_if>
</div>
<!-- end position 4 -->
</div>
<div style="clear: both;">&nbsp;</div>
<tmpl_if showAdmin>
<table><tr id="blank" class="hidden"><td><div><div class="empty">&nbsp;</div></div></td></tr></table>
<tmpl_var dragger.init>
</tmpl_if>
END
WebGUI::Asset->new("PBtmpl0000000000000109","WebGUI::Asset::Template")->addRevision({template=>$template})->commit;
# three over one
$template = <<END;
<a href="<tmpl_var assetId>"></a>
<tmpl_if displayTitle>
<h1><tmpl_var title></h1>
</tmpl_if>
<tmpl_if description>
<p><tmpl_var description></p>
</tmpl_if>
<tmpl_if showAdmin>
<p><tmpl_var controls></p>
</tmpl_if>
<div style="clear: both;">&nbsp;</div>
<div>
<!-- begin position 1 -->
<div style="width: 32%; float: left;">
<tmpl_if showAdmin>
<table border="0" id="position1" class="content"><tbody>
</tmpl_if>
<tmpl_loop position1_loop>
<tmpl_if showAdmin>
<tr id="td<tmpl_var id>">
<td><div id="td<tmpl_var id>_div" class="dragable">
</tmpl_if>
<div class="content"><tmpl_var dragger.icon><tmpl_var content></div>
<tmpl_if showAdmin>
</div></td>
</tr>
</tmpl_if>
</tmpl_loop>
<tmpl_if showAdmin>
</tbody></table>
</tmpl_if>
</div>
<!-- end position 1 -->
<!-- begin position 2 -->
<div style="width: 33%; float: left;">
<tmpl_if showAdmin>
<table border="0" id="position2" class="content"><tbody>
</tmpl_if>
<tmpl_loop position2_loop>
<tmpl_if showAdmin>
<tr id="td<tmpl_var id>">
<td><div id="td<tmpl_var id>_div" class="dragable">
</tmpl_if>
<div class="content"><tmpl_var dragger.icon><tmpl_var content></div>
<tmpl_if showAdmin>
</div></td>
</tr>
</tmpl_if>
</tmpl_loop>
<tmpl_if showAdmin>
</tbody></table>
</tmpl_if>
</div>
<!-- end position 2 -->
<!-- begin position 3 -->
<div style="width: 32%; float: left;">
<tmpl_if showAdmin>
<table border="0" id="position3" class="content"><tbody>
</tmpl_if>
<tmpl_loop position3_loop>
<tmpl_if showAdmin>
<tr id="td<tmpl_var id>">
<td><div id="td<tmpl_var id>_div" class="dragable">
</tmpl_if>
<div class="content"><tmpl_var dragger.icon><tmpl_var content></div>
<tmpl_if showAdmin>
</div></td>
</tr>
</tmpl_if>
</tmpl_loop>
<tmpl_if showAdmin>
</tbody></table>
</tmpl_if>
</div>
<!-- end position 3 -->
</div>
<div style="clear: both;">&nbsp;</div>
<!-- begin position 4 -->
<div>
<tmpl_if showAdmin>
<table border="0" id="position4" class="content"><tbody>
</tmpl_if>
<tmpl_loop position4_loop>
<tmpl_if showAdmin>
<tr id="td<tmpl_var id>">
<td><div id="td<tmpl_var id>_div" class="dragable">
</tmpl_if>
<div class="content"><tmpl_var dragger.icon><tmpl_var content></div>
<tmpl_if showAdmin>
</div></td>
</tr>
</tmpl_if>
</tmpl_loop>
<tmpl_if showAdmin>
</tbody></table>
</tmpl_if>
</div>
<!-- end position 4 -->
<tmpl_if showAdmin>
<table><tr id="blank" class="hidden"><td><div><div class="empty">&nbsp;</div></div></td></tr></table>
<tmpl_var dragger.init>
</tmpl_if>
END
WebGUI::Asset->new("PBtmpl0000000000000118","WebGUI::Asset::Template")->addRevision({template=>$template})->commit;
}
#-------------------------------------------------
sub removeOldFiles {
print "\tRemoving files that are no longer needed.\n" unless ($quiet);
unlink("../../lib/WebGUI/Search.pm");
}
#-------------------------------------------------
sub speedUpAdminConsole {
print "\tMaking admin console load faster.\n" unless ($quiet);
my $template = <<END;
^StyleSheet(^Extras;/adminConsole/adminConsole.css);
^JavaScript(^Extras;/adminConsole/adminConsole.js);
<div id="application_title">
<tmpl_var application.title>
</div>
<div id="application_workarea">
<tmpl_var application.workArea>
</div>
<div id="console_workarea">
<div class="adminConsoleSpacer">
&nbsp;
</div>
<tmpl_loop application_loop>
<tmpl_if canUse>
<div class="adminConsoleApplication">
<a href="<tmpl_var url>"><img src="<tmpl_var icon>" border="0" title="<tmpl_var title>" alt="<tmpl_var title>" /></a><br />
<a href="<tmpl_var url>"><tmpl_var title></a>
</div>
</tmpl_if>
</tmpl_loop>
<div class="adminConsoleSpacer">
&nbsp;
</div>
</div>
<div class="adminConsoleMenu">
<div id="adminConsoleMainMenu" class="adminConsoleMainMenu">
<div id="console_toggle_on">
<a href="#" onClick="toggleAdminConsole()"><tmpl_var toggle.on.label></a><br />
</div>
<div id="console_toggle_off">
<a href="#" onClick="toggleAdminConsole()"><tmpl_var toggle.off.label></a><br />
</div>
</div>
<div id="adminConsoleApplicationSubmenu" class="adminConsoleApplicationSubmenu">
<tmpl_loop submenu_loop>
<a href="<tmpl_var url>" <tmpl_var extras>><tmpl_var label></a><br />
</tmpl_loop>
</div>
<div id="adminConsoleUtilityMenu" class="adminConsoleUtilityMenu">
<a href="<tmpl_var backtosite.url>"><tmpl_var backtosite.label></a><br />
^AdminToggle;<br />
^LoginToggle;<br />
</div>
</div>
<div id="console_title">
<tmpl_var console.title>
</div>
<div id="application_help">
<tmpl_if help.url>
<a href="<tmpl_var help.url>" target="_blank"><img src="^Extras;/adminConsole/small/help.gif" alt="?" border="0" /></a>
</tmpl_if>
</div>
<div id="application_icon">
<img src="<tmpl_var application.icon>" border="0" title="<tmpl_var application.title>" alt="<tmpl_var application.title>" />
</div>
<div class="adminConsoleTitleIconMedalian">
<img src="^Extras;/adminConsole/medalian.gif" border="0" alt="*" />
</div>
<div id="console_icon">
<img src="<tmpl_var console.icon>" border="0" title="<tmpl_var console.title>" alt="<tmpl_var console.title>" />
</div>
<script type="text/javascript">
initAdminConsole(<tmpl_if application.title>true<tmpl_else>false</tmpl_if>,<tmpl_if submenu_loop>true<tmpl_else>false</tmpl_if>);
</script>
END
my $asset = WebGUI::Asset->new("PBtmpl0000000000000001","WebGUI::Asset::Template");
$asset->addRevision({template=>$template})->commit;
}
#-------------------------------------------------
sub fixTimeFields {
print "\tFixing time fields.\n" unless ($quiet);
WebGUI::SQL->write("update DataForm_field set type=".quote('TimeField')." where type=".quote('time'));
WebGUI::SQL->write("update userProfileField set dataType=".quote('TimeField')." where dataType=".quote('time'));
}
#-------------------------------------------------
sub fixCSTemplate {
print "\tFixing CS Search template.\n" unless ($quiet);
my $asset = WebGUI::Asset->new("PBtmpl0000000000000031","WebGUI::Asset::Template");
my $template = $asset->get("template");
$template =~ s/<tmpl_var date>/<tmpl_var dateSubmitted.human>/ixsg;
$template =~ s/<tmpl_var time>/<tmpl_var timeSubmitted.human>/ixsg;
$asset->addRevision({template=>$template})->commit;
}
#-------------------------------------------------
sub fixSpelling {
print "\tFixing a few spelling problems.\n" unless ($quiet);
my $asset = WebGUI::Asset->new("PBtmplCP00000000000001","WebGUI::Asset::Template");
$asset->addRevision({url=>"default_product_template"})->commit;
$asset = WebGUI::Asset->new("PBtmpl0000000000000134","WebGUI::Asset::Template");
my $template = $asset->get("template");
$template =~ s/spesify/specify/ixsg;
$asset->addRevision({template=>$template})->commit;
}
#-------------------------------------------------
sub start {
$|=1; #disable output buffering
GetOptions(
'configFile=s'=>\$configFile,
'quiet'=>\$quiet
);
WebGUI::Session::open("../..",$configFile);
WebGUI::Session::refreshUserInfo(3);
WebGUI::SQL->write("insert into webguiVersion values (".quote($toVersion).",'upgrade',".time().")");
}
#-------------------------------------------------
sub finish {
WebGUI::Session::close();
}