X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Faccept_context_regression.t;h=916281a16d718e51d2ceac0008dcd49213ea3d50;hp=0fb09e9af25af27ce4fedf2765130016b96d63bd;hb=b114ef4764de1bc4f492ba9832b3bae3eba2e17c;hpb=98d049efac171f40ddcd1553d033f8daf6145e7d diff --git a/t/accept_context_regression.t b/t/accept_context_regression.t index 0fb09e9..916281a 100644 --- a/t/accept_context_regression.t +++ b/t/accept_context_regression.t @@ -1,4 +1,6 @@ -use Test::Most; +use strict; +use warnings; +use Test::More; { package MyApp::Model::AcceptContext; @@ -6,7 +8,7 @@ use Test::Most; sub ACCEPT_CONTEXT { my ($self, $c, @args) = @_; - Test::Most::ok( ref $c); + Test::More::ok( ref $c); } $INC{'MyApp/Model/AcceptContext.pm'} = __FILE__; @@ -23,7 +25,7 @@ use Test::Most; package MyApp; use Catalyst; - + MyApp->setup; } @@ -33,8 +35,6 @@ my ($res, $c) = ctx_request('/test_model'); ok $res; -use Devel::Dwarn; -#Dwarn $c->model('AcceptContext'); done_testing;