fix transform in void context, Middleware::Runtime

[chaz/p5-HTTP-AnyUA] / lib / HTTP / AnyUA / Middleware.pm

diff --git a/lib/HTTP/AnyUA/Middleware.pm b/lib/HTTP/AnyUA/Middleware.pm
index 21b6db8a631be64c8217befd3179fd2be2776bde..5f5359b0c93dcebfb5edd5cfb1df10be9b22dcfe 100644 (file)
--- a/lib/HTTP/AnyUA/Middleware.pm
+++ b/lib/HTTP/AnyUA/Middleware.pm
@@ -13,7 +13,7 @@ package HTTP::AnyUA::Middleware;
         # Maybe do something with the request args here.
 
         # Let backend handle the response:
-        my $response = $self->backend($method, $url, $args);
+        my $response = $self->backend->request($method, $url, $args);
 
         my $handle_response = sub {
             my $response = shift;
@@ -24,7 +24,7 @@ package HTTP::AnyUA::Middleware;
         };
 
         if ($self->response_is_future) {
-            $response->transform(
+            $response = $response->transform(
                 done => $handle_response,
                 fail => $handle_response,
             );