bug fixes

This commit is contained in:
JT Smith 2005-08-23 21:45:44 +00:00
parent a93a2d05d1
commit 8a656aece7
4 changed files with 39 additions and 6 deletions

View file

@ -7,6 +7,7 @@ use Getopt::Long;
use strict;
use WebGUI::Session;
use WebGUI::SQL;
use WebGUI::Asset;
my $configFile;
my $quiet;
@ -20,7 +21,33 @@ WebGUI::Session::open("../..",$configFile);
WebGUI::Session::refreshUserInfo(3);
WebGUI::SQL->write("insert into webguiVersion values (".quote($toVersion).",'upgrade',".time().")");
fixSpelling();
fixCSTemplate();
WebGUI::Session::close();
#-------------------------------------------------
sub fixCSTemplate {
print "\tFixing CS Search template.\n" unless ($quiet);
my $asset = WebGUI::Asset->newByDynamicClass("PBtmpl0000000000000031");
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->update({template=>$template});
$asset->commit;
}
#-------------------------------------------------
sub fixSpelling {
print "\tFixing a few spelling problems.\n" unless ($quiet);
my $asset = WebGUI::Asset->newByDynamicClass("PBtmplCP00000000000001");
$asset->update({url=>"default_product_template"});
$asset->commit;
$asset = WebGUI::Asset->newByDynamicClass("PBtmpl0000000000000134");
my $template = $asset->get("template");
$template =~ s/spesify/specify/ixsg;
$asset->update({template=>$template});
$asset->commit;
}