diff options
Diffstat (limited to 'lib/Net/HTTP/Spore/Role/Request.pm')
-rw-r--r-- | lib/Net/HTTP/Spore/Role/Request.pm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lib/Net/HTTP/Spore/Role/Request.pm b/lib/Net/HTTP/Spore/Role/Request.pm index ddd52e6..7fbb290 100644 --- a/lib/Net/HTTP/Spore/Role/Request.pm +++ b/lib/Net/HTTP/Spore/Role/Request.pm @@ -38,7 +38,10 @@ sub http_request { return $response; } - my $result = $self->request($request->finalize); + my $final = $request->finalize; + $self->_trace_msg("<- ".$request->method. " => ".$request->uri); + + my $result = $self->request($final); $response = $request->new_response( $result->code, @@ -46,6 +49,8 @@ sub http_request { $result->content, ); + $self->_trace_msg("<- HTTP Status".$result->code ); + map { $_->($response) } reverse @middlewares; $response; |