From e23d239e2a5d242d63da00bd850f5d88e918b7a1 Mon Sep 17 00:00:00 2001
From: JT Smith <jt@plainblack.com>
Date: Thu, 16 Mar 2006 01:40:38 +0000
Subject: [PATCH] fixed a little problem with the new version tag commit

---
 docs/upgrades/upgrade_6.8.7-6.99.0.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/docs/upgrades/upgrade_6.8.7-6.99.0.pl b/docs/upgrades/upgrade_6.8.7-6.99.0.pl
index eb01f76fb..5be136a46 100644
--- a/docs/upgrades/upgrade_6.8.7-6.99.0.pl
+++ b/docs/upgrades/upgrade_6.8.7-6.99.0.pl
@@ -128,6 +128,8 @@ sub addWorkflow {
 		primary key (activityId, name)
 		)");
 	print "\t\tPurging old workflow info.\n";
+	my $versionTag = WebGUI::VersionTag->getWorking($session);
+	$versionTag->set({name=>"Upgrade to ".$toVersion});
 	my $rs = $session->db->read("select assetId from assetData where status='denied'");
 	while (my ($id) = $rs->array) {
 		my $asset = WebGUI::Asset->newByDynamicClass($session, $id);
@@ -667,8 +669,6 @@ 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;
 }