From: Arthur Axel "fREW" Schmidt <frioux@gmail.com>
Date: Wed, 5 Aug 2009 18:54:41 +0000 (+0000)
Subject: Fix testing bug.  Windows only.
X-Git-Tag: v0.08109~36
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a3df35f88e3391cd0b6cb3c34631211d2ebb18e2;p=dbsrgits%2FDBIx-Class.git

Fix testing bug.  Windows only.
---

diff --git a/t/93storage_replication.t b/t/93storage_replication.t
index ef2092a..9b6f1bf 100644
--- a/t/93storage_replication.t
+++ b/t/93storage_replication.t
@@ -253,6 +253,7 @@ my $replicated_class = DBICTest->has_custom_dsn ?
 my $replicated;
 
 for my $method (qw/by_connect_info by_storage_type/) {
+  undef $replicated;
   ok $replicated = $replicated_class->new($method)
       => "Created a replication object $method";