2 files changed, 13 insertions, 2 deletions
diff --git a/lib/Net/HTTP/Spore/Role/Debug.pm b/lib/Net/HTTP/Spore/Role/Debug.pm
index 772373a..e178c42 100644
--- a/lib/Net/HTTP/Spore/Role/Debug.pm
+++ b/lib/Net/HTTP/Spore/Role/Debug.pm
@@ -9,6 +9,13 @@ has trace => (
     default => sub { $ENV{SPORE_TRACE} ? 1 : 0; }
 );
 
-sub _trace_msg { print STDOUT $_[1]."\n" if $_[0]->trace; }
+has handle => (
+    is => 'rw', isa => 'Object',
+);
+
+sub _trace_msg {
+    my $self = shift;
+    print STDOUT $_[0]."\n" if $self->trace;
+}
 
 1;
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,