expand ParamParser comment so nobody breaks it again
[catagits/Web-Simple.git] / t / post.t
index c908256..d7eeb1d 100644 (file)
--- a/t/post.t
+++ b/t/post.t
@@ -23,17 +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 { $response = shift->($request) });
-  return $response;
-}
+sub run_request { $app->run_test_request(@_); }
 
 my $get = run_request(GET 'http://localhost/');