Release commit for 0.020
[catagits/Web-Simple.git] / t / post.t
index 24d6086..d7eeb1d 100644 (file)
--- a/t/post.t
+++ b/t/post.t
@@ -23,16 +23,10 @@ use Test::More qw(no_plan);
   }
 }
 
-use Plack::Test;
 use HTTP::Request::Common qw(GET POST);
 
 my $app = PostTest->new;
-
-sub run_request {
-  my $request = shift;
-  my $response = test_psgi($app->to_psgi_app, sub { shift->($request) });
-  return $response;
-}
+sub run_request { $app->run_test_request(@_); }
 
 my $get = run_request(GET 'http://localhost/');