From: Brandon L. Black <blblack@gmail.com>
Date: Wed, 1 Mar 2006 05:58:00 +0000 (+0000)
Subject: t/50fork.t made a little more resilient
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=6adfd46229f02958ef8e163ef973b827e123bf14;p=dbsrgits%2FDBIx-Class-Historic.git

t/50fork.t made a little more resilient
---

diff --git a/t/50fork.t b/t/50fork.t
index 0e40c6a..79ba7a6 100644
--- a/t/50fork.t
+++ b/t/50fork.t
@@ -28,7 +28,10 @@ my ($first_rs, $joe_record);
 eval {
     my $dbh = PgTest->schema->storage->dbh;
 
-    $dbh->do("CREATE TABLE cd (cdid serial PRIMARY KEY, artist INTEGER NOT NULL UNIQUE, title VARCHAR(255) NOT NULL UNIQUE, year VARCHAR(255));");
+    eval {
+        $dbh->do("DROP TABLE cd");
+        $dbh->do("CREATE TABLE cd (cdid serial PRIMARY KEY, artist INTEGER NOT NULL UNIQUE, title VARCHAR(255) NOT NULL UNIQUE, year VARCHAR(255));");
+    };
 
     PgTest->resultset('CD')->create({ title => 'vacation in antarctica', artist => 123, year => 1901 });
     PgTest->resultset('CD')->create({ title => 'vacation in antarctica part 2', artist => 456, year => 1901 });