X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Flib%2FTestAppPluginWithConstructor.pm;h=faa1f9c76b67da89a8e24f35eaab5c71c435eacf;hp=5b4b8c122d19ec96da103cbb592c89a8384e5f99;hb=82010ea176741c7a4f2baf3f6f27377b1d9f6b15;hpb=9d04b6857491ce04e79cf93bdd45727e052ad6e6 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;