manually set request

hashbangperl · Nov 25, 2009 · 334bf06 · 334bf06
1 parent ffedcf9
commit 334bf06
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/lib/Plack/Test/MockHTTP.pm b/lib/Plack/Test/MockHTTP.pm
@@ -17,6 +17,7 @@ sub test_psgi {
         my $req = shift;
         my $env = $req->to_psgi;
         my $res = HTTP::Response->from_psgi($app->($env));
+	$res->request($req);
     };
 
     $client->($cb);