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;
$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);