From: Peter Rabbitson Date: Fri, 27 Apr 2012 07:39:44 +0000 (+0200) Subject: Adjust tests for new Moo X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e6ff36589c607d5a5a403169f7df73379b93e256;p=dbsrgits%2FDBIx-Class-Historic.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 };