mark some tests as requiring no preloads when run with yath
[catagits/Catalyst-Runtime.git] / t / accept_context_regression.t
index 0fb09e9..2d1a2d3 100644 (file)
@@ -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;
-