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

preparing for 6.7.6 release

Browse source
This commit is contained in:
JT Smith 2005-10-11 16:48:03 +00:00
parent ff206a3290
commit 848b0cdcc3
2 changed files with 47 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

12
docs/create.sql
View file

File diff suppressed because one or more lines are too long

41
docs/upgrades/upgrade_6.7.5-6.7.6.pl Normal file
View file

@ -0,0 +1,41 @@
use lib "../../lib";
use strict;
use Getopt::Long;
use WebGUI::Session;
use WebGUI::SQL;
use WebGUI::Asset;
use WebGUI::Setting;
my $toVersion = "6.7.6";
my $configFile;
my $quiet;
start();
finish();
#-------------------------------------------------
sub somefunc {
print "\tDoing something.\n" unless ($quiet);
# do something
}
#-------------------------------------------------
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();
}