From: Peter Rabbitson <ribasushi@cpan.org>
Date: Sat, 16 May 2009 07:30:05 +0000 (+0000)
Subject: Not sure what this part of the test is for, but it breaks custom resultsets, and... 
X-Git-Tag: v0.08103~78
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=149f24a3e0f97b6b8e1749c123a22cf6b3cc0f7f;p=dbsrgits%2FDBIx-Class.git

Not sure what this part of the test is for, but it breaks custom resultsets, and the test passes without it. Removing as a possible remnant of an ancient civilization
---

diff --git a/t/82cascade_copy.t b/t/82cascade_copy.t
index 26b8425..5f8a542 100644
--- a/t/82cascade_copy.t
+++ b/t/82cascade_copy.t
@@ -11,14 +11,7 @@ plan tests => 4;
 my $artist = $schema->resultset('Artist')->find(1);
 my $artist_cds = $artist->search_related('cds');
 
-my $cover_band;
-
-{
-  no warnings qw(redefine once);
-  local *DBICTest::Artist::result_source_instance = \&DBICTest::Schema::Artist::result_source_instance;
-
-  $cover_band = $artist->copy;
-}
+my $cover_band = $artist->copy;
 
 my $cover_cds = $cover_band->search_related('cds');
 cmp_ok($cover_band->id, '!=', $artist->id, 'ok got new column id...');