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

version tags now commit everything at the end of the upgrade

Browse source
This commit is contained in:
JT Smith 2006-03-16 01:26:33 +00:00
parent 5cf7f98d32
commit d936bbfa2b
2 changed files with 10 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

4
docs/upgrades/_upgrade.skeleton
View file

@ -46,6 +46,8 @@ sub start {
);
my $session = WebGUI::Session->open("../..",$configFile);
$session->user({userId=>3});
my $versionTag = WebGUI::VersionTag->getWorking($session);
$versionTag->set({name=>"Upgrade to ".$toVersion});
$session->db->write("insert into webguiVersion values (".$session->db->quote($toVersion).",'upgrade',".$session->datetime->time().")");
return $session;
}
@ -53,6 +55,8 @@ sub start {
#-------------------------------------------------
sub finish {
my $session = shift;
my $versionTag = WebGUI::VersionTag->getWorking($session);
$versionTag->commit;
$session->close();
}