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

fixed printable style

Browse source
This commit is contained in:
JT Smith 2004-02-29 17:38:55 +00:00
parent 6c33a7805e
commit 3c58affcd1
1 changed files with 5 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

5
docs/upgrades/upgrade_5.9.9-6.0.0.pl
View file

@ -23,6 +23,11 @@ WebGUI::Session::open("../..",$configFile);
print "\tMigrating styles.\n" unless ($quiet);
my $sth = WebGUI::SQL->read("select * from style");
while (my $style = $sth->hashRef) {
if ($style->{styleId} == 3) {
$style->{body} =~ s/styles\/plainblack\/logo-white\.gif/plainblack.gif/ixsg;
$style->{body} =~ s/2001-2002/2001-2004/ixsg;
$style->{body} =~ s/Plain\s+Black\s+Software/Plain Black LLC/ixsg;
}
my ($header,$footer) = split(/\^\-\;/,$style->{body});
my ($newStyleId) = WebGUI::SQL->quickArray("select max(templateId) from template where namespace='style'");
if ($style->{styleId} > 0 && $style->{styleId} < 25) {