Clean up Sessions that are built for testing.

This commit is contained in:
Colin Kuskie 2009-09-25 17:54:07 -07:00
parent ec6887b0ac
commit 5876dec8de

View file

@ -216,6 +216,7 @@ is($siteWideTag->getId(), $siteWideTagId, 'versionTagMode siteWide: reclaim site
## Through in a new session as different user
my $admin_session = WebGUI::Session->open($WebGUI::Test::WEBGUI_ROOT, $WebGUI::Test::CONFIG_FILE);
$admin_session->user({'userId' => 3});
WebGUI::Test->sessionsToDelete($admin_session);
setUserVersionTagMode($admin_session->user(), q{singlePerUser});
@ -279,6 +280,7 @@ $adminUserTag->rollback();
# create admin session
my $admin_session = WebGUI::Session->open($WebGUI::Test::WEBGUI_ROOT, $WebGUI::Test::CONFIG_FILE);
WebGUI::Test->sessionsToDelete($admin_session);
$admin_session->user({'userId' => 3});
setUserVersionTagMode($admin_session->user(), q{autoCommit});
@ -330,6 +332,7 @@ $adminUserTag->rollback();
# create admin session
$admin_session = WebGUI::Session->open($WebGUI::Test::WEBGUI_ROOT, $WebGUI::Test::CONFIG_FILE);
WebGUI::Test->sessionsToDelete($admin_session);
$admin_session->user({'userId' => 3});
setUserVersionTagMode($admin_session->user(), q{autoCommit});