minor doc updates
[catagits/Web-Simple.git] / t / post.t
index 805e57b..d7eeb1d 100644 (file)
--- a/t/post.t
+++ b/t/post.t
@@ -23,15 +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;
-  return test_psgi $app->to_psgi_app, sub { shift->($request) };
-}
+sub run_request { $app->run_test_request(@_); }
 
 my $get = run_request(GET 'http://localhost/');