set correct %INC

[catagits/Catalyst-Runtime.git] / t / body_fh.t

diff --git a/t/body_fh.t b/t/body_fh.t
index cc00020..3b7f616 100644 (file)
--- a/t/body_fh.t
+++ b/t/body_fh.t
@@ -4,7 +4,10 @@ use Test::More;
 use HTTP::Request::Common;
 use HTTP::Message::PSGI;
 use Plack::Util;
-use Devel::Dwarn;
+
+# Test case to check that we now send scalar and filehandle like
+# bodys directly to the PSGI engine, rather than call $writer->write
+# or unroll the filehandle ourselves.
 
 {
   package MyApp::Controller::Root;
@@ -37,12 +40,14 @@ use Devel::Dwarn;
     $c->res->body('manual_write');
   }
 
+  $INC{'MyApp/Controller/Root.pm'} = __FILE__; # sorry...
+
   package MyApp;
   use Catalyst;
 
 }
 
-$INC{'MyApp/Controller/Root.pm'} = '1'; # sorry...
+
 
 ok(MyApp->setup);
 ok(my $psgi = MyApp->psgi_app);