From: Peter Rabbitson <ribasushi@cpan.org>
Date: Fri, 27 Apr 2012 07:39:44 +0000 (+0200)
Subject: Adjust tests for new Moo
X-Git-Tag: v0.08197~15
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e6ff36589c607d5a5a403169f7df73379b93e256;p=dbsrgits%2FDBIx-Class.git

Adjust tests for new Moo
---

diff --git a/Makefile.PL b/Makefile.PL
index 90ac332..6892bcd 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -63,7 +63,7 @@ my $runtime_requires = {
   'Data::Page'               => '2.00',
   'Devel::GlobalDestruction' => '0',
   'Hash::Merge'              => '0.12',
-  'Moo'                      => '0.009014',
+  'Moo'                      => '0.009100',
   'MRO::Compat'              => '0.09',
   'Module::Find'             => '0.06',
   'namespace::clean'         => '0.20',
diff --git a/t/52leaks.t b/t/52leaks.t
index a5ad085..7b51dc4 100644
--- a/t/52leaks.t
+++ b/t/52leaks.t
@@ -111,6 +111,7 @@ unless (DBICTest::RunMode->is_plain) {
   require DBI;
   require DBD::SQLite;
   require FileHandle;
+  require Moo;
 
   %$weak_registry = ();
 }
diff --git a/t/55namespaces_cleaned.t b/t/55namespaces_cleaned.t
index aa6fca0..5a5cd63 100644
--- a/t/55namespaces_cleaned.t
+++ b/t/55namespaces_cleaned.t
@@ -79,9 +79,6 @@ my $skip_idx = { map { $_ => 1 } (
   # this subclass is expected to inherit whatever crap comes
   # from the parent
   'DBIx::Class::ResultSet::Pager',
-
-  # Moo does not name its generated methods, fix pending
-  'DBIx::Class::Storage::BlockRunner',
 ) };
 
 my $has_cmop = eval { require Class::MOP };