X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Faggregate%2Funit_core_component_setup_component.t;h=c2cab1eef781e4d108442db9da58fcedde378dd2;hb=41c0e09a56ab8ea4cc2dc249e7989101169189d0;hp=08c0286fb99de8cea9b08e523ebb529db6de58b5;hpb=03e89d2c39c919833f58675f7c62d622673c2308;p=catagits%2FCatalyst-Runtime.git

diff --git a/t/aggregate/unit_core_component_setup_component.t b/t/aggregate/unit_core_component_setup_component.t
index 08c0286..c2cab1e 100644
--- a/t/aggregate/unit_core_component_setup_component.t
+++ b/t/aggregate/unit_core_component_setup_component.t
@@ -1,8 +1,9 @@
 use strict;
 use warnings;
-use Test::More;
+
+# FIXME - backcompat?
+use Test::More skip_all => "Removed setup_component from Catalyst.pm";
 use Moose::Meta::Class;
-use Data::Dumper;
 
 my %config = (
     foo => 42,
@@ -77,7 +78,7 @@ Moose::Meta::Class->create( $regular => (
     $component = eval { TestAppComponent->setup_component($config) };
     ok( !$@, "setup_component doesnt die with $config" );
     is( $message, undef, "no exception thrown" );
-    is_deeply( $component, bless(\%config, $config), "the returned config is correct" );
+    is_deeply( $component, \%config, "the returned config is correct" );
 
     undef $message;
     $component = eval { TestAppComponent->setup_component($dieing) };
@@ -96,4 +97,4 @@ Moose::Meta::Class->create( $regular => (
     isa_ok( $component, $regular, "the returned value is correct" );
 }
 
-done_testing();
+done_testing;