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,
$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) };
isa_ok( $component, $regular, "the returned value is correct" );
}
-done_testing();
+done_testing;