X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FTestAppPluginWithConstructor.pm;h=faa1f9c76b67da89a8e24f35eaab5c71c435eacf;hb=eefc03e12890c06c9a76d78b4d68e3b2ad781328;hp=5b4b8c122d19ec96da103cbb592c89a8384e5f99;hpb=9d04b6857491ce04e79cf93bdd45727e052ad6e6;p=catagits%2FCatalyst-Runtime.git diff --git a/t/lib/TestAppPluginWithConstructor.pm b/t/lib/TestAppPluginWithConstructor.pm index 5b4b8c1..faa1f9c 100644 --- a/t/lib/TestAppPluginWithConstructor.pm +++ b/t/lib/TestAppPluginWithConstructor.pm @@ -1,17 +1,17 @@ # See t/plugin_new_method_backcompat.t package TestAppPluginWithConstructor; use Test::More; -use Test::Exception; +use Test::Fatal; use Catalyst qw/+TestPluginWithConstructor/; use Moose; -BEGIN { extends qw/Catalyst Catalyst::Controller/ } # Ewww, FIXME. +extends qw/Catalyst/; __PACKAGE__->setup; our $MODIFIER_FIRED = 0; -lives_ok { +is exception { before 'dispatch' => sub { $MODIFIER_FIRED = 1 } -} 'Can apply method modifier'; +}, undef, 'Can apply method modifier'; no Moose; our $IS_IMMUTABLE_YET = __PACKAGE__->meta->is_immutable;