diff options
| author | franck cuny <franck@lumberjaph.net> | 2011-02-03 18:11:31 +0100 |
|---|---|---|
| committer | franck cuny <franck@lumberjaph.net> | 2011-07-26 13:19:58 +0200 |
| commit | ebf98f6927b839015323733636a8e10e22ee6faa (patch) | |
| tree | 7e728d0f0cbd1b659719f06246293ff5e3b0791e /lib/Net/HTTP/Spore/Role/Request.pm | |
| parent | fix a problem when decoding serialized content when not needed (diff) | |
| download | net-http-spore-ebf98f6927b839015323733636a8e10e22ee6faa.tar.gz | |
trying to finish the trace stuff ..
Diffstat (limited to 'lib/Net/HTTP/Spore/Role/Request.pm')
| -rw-r--r-- | lib/Net/HTTP/Spore/Role/Request.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/Net/HTTP/Spore/Role/Request.pm b/lib/Net/HTTP/Spore/Role/Request.pm index 0af15f7..832549d 100644 --- a/lib/Net/HTTP/Spore/Role/Request.pm +++ b/lib/Net/HTTP/Spore/Role/Request.pm @@ -67,7 +67,11 @@ sub _execute_middlewares_on_response { sub _request { my ($self, $request) = @_; - my $result = $self->request($request->finalize); + my $req_final = $request->finalize(); + + $self->_trace_msg( $req_final->method . ' ' . $req_final->url ); + + my $result = $self->request($req_final); my $response = $request->new_response( $result->code, |