From 35e5b95fb6dae085efb6aefee4619023308fcaef Mon Sep 17 00:00:00 2001
From: Doug Bell <doug@plainblack.com>
Date: Thu, 12 Jun 2008 23:34:48 +0000
Subject: [PATCH] fixed WebGUI::Utility::Gallery tests

---
 t/Utility/Gallery/addAlbumFromCollaboration.t | 8 ++++++++
 t/Utility/Gallery/addAlbumFromFolder.t        | 4 ++++
 2 files changed, 12 insertions(+)

diff --git a/t/Utility/Gallery/addAlbumFromCollaboration.t b/t/Utility/Gallery/addAlbumFromCollaboration.t
index e4ef0adea..248a80ace 100644
--- a/t/Utility/Gallery/addAlbumFromCollaboration.t
+++ b/t/Utility/Gallery/addAlbumFromCollaboration.t
@@ -81,6 +81,8 @@ $posts[0][0]->getStorageLocation->addFileFromFilesystem(
     WebGUI::Test->getTestCollateralPath('lamp.jpg')
 );
 
+$versionTags[-1]->commit;
+
 # Thread fields mapped to album fields that should be migrated
 my %threadFields = (
     content         => "description",
@@ -147,7 +149,9 @@ ok(
     "addAlbumFromThread croaks if second argument is not a Thread asset",
 );
 
+push @versionTags, WebGUI::VersionTag->getWorking( $session );
 $utility->addAlbumFromThread( $gallery, $threads[0] );
+$versionTags[-1]->commit;
 
 is(
     scalar @{ $gallery->getAlbumIds }, 1,
@@ -155,6 +159,8 @@ is(
 );
 
 $album = WebGUI::Asset->newByDynamicClass( $session, $gallery->getAlbumIds->[0] );
+use Data::Dumper;
+diag( Dumper $gallery->getAlbumIds );
 
 is(
     $album->get('revisionDate'), $threads[0]->get('revisionDate'),
@@ -251,7 +257,9 @@ ok(
     "addAlbumFromCollaboration croaks if second argument is not a Collaboration asset",
 );
 
+push @versionTags, WebGUI::VersionTag->getWorking( $session );
 $utility->addAlbumFromCollaboration( $gallery, $collab );
+$versionTags[-1]->commit;
 
 is(
     scalar @{ $gallery->getAlbumIds }, scalar @threads,
diff --git a/t/Utility/Gallery/addAlbumFromFolder.t b/t/Utility/Gallery/addAlbumFromFolder.t
index ea280932a..deba560c1 100644
--- a/t/Utility/Gallery/addAlbumFromFolder.t
+++ b/t/Utility/Gallery/addAlbumFromFolder.t
@@ -58,6 +58,8 @@ for (0..2) {
     );
 }
 
+$versionTags[-1]->commit;
+
 # File to GalleryFile field mappings. Should be mostly the same
 my %fileField  = (
     title       => "title",
@@ -111,7 +113,9 @@ ok(
     "addAlbumFromFolder croaks if second argument is not a Folder asset",
 );
 
+push @versionTags, WebGUI::VersionTag->getWorking( $session );
 $utility->addAlbumFromFolder( $gallery, $folder );
+$versionTags[-1]->commit;
 
 is(
     scalar @{ $gallery->getAlbumIds }, 1,