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=2d1a2d3f78581d1b8cc7d62749e6e42803142094;hp=0fb09e9af25af27ce4fedf2765130016b96d63bd;hb=a21b003477f442246a2e68d0d4ec8267332b09bf;hpb=98d049efac171f40ddcd1553d033f8daf6145e7d

diff --git a/t/accept_context_regression.t b/t/accept_context_regression.t
index 0fb09e9..2d1a2d3 100644
--- a/t/accept_context_regression.t
+++ b/t/accept_context_regression.t
@@ -1,16 +1,20 @@
-use Test::Most;
+use strict;
+use warnings;
+use Test::More;
 
-{
+BEGIN {
   package MyApp::Model::AcceptContext;
   use base 'Catalyst::Model';
 
   sub ACCEPT_CONTEXT {
     my ($self, $c, @args) = @_;
-    Test::Most::ok( ref $c);
+    Test::More::ok( ref $c);
   }
 
   $INC{'MyApp/Model/AcceptContext.pm'} = __FILE__;
+}
 
+BEGIN {
   package MyApp::Controller::Root;
   use base 'Catalyst::Controller';
 
@@ -20,21 +24,19 @@ use Test::Most;
   }
 
   $INC{'MyApp/Controller/Root.pm'} = __FILE__;
+}
 
+BEGIN {
   package MyApp;
   use Catalyst;
-  
+
   MyApp->setup;
 }
 
 use Catalyst::Test 'MyApp';
 
-my ($res, $c) = ctx_request('/test_model');
+my ($res, $c) = ctx_request('/root/test_model');
 
 ok $res;
 
-use Devel::Dwarn;
-#Dwarn $c->model('AcceptContext');
-
 done_testing;
-