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=9828702f811b544556b9d98a6671a1fdbc0a2cbe;hp=0fb09e9af25af27ce4fedf2765130016b96d63bd;hb=eefc03e12890c06c9a76d78b4d68e3b2ad781328;hpb=98d049efac171f40ddcd1553d033f8daf6145e7d diff --git a/t/accept_context_regression.t b/t/accept_context_regression.t index 0fb09e9..9828702 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__; @@ -33,8 +35,6 @@ my ($res, $c) = ctx_request('/test_model'); ok $res; -use Devel::Dwarn; -#Dwarn $c->model('AcceptContext'); done_testing;