X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst.pm;h=3c7dd25f71744dc0f321af2b60e0c411cdc90133;hp=a2eb1dacc09128172a7966a8420414a9658ed730;hb=025d09f99a573f9efde3e001190bb584116ccb32;hpb=2bf5493662a9678fbf3de608db0f1ede0472083d

diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm
index a2eb1da..3c7dd25 100644
--- a/lib/Catalyst.pm
+++ b/lib/Catalyst.pm
@@ -78,7 +78,7 @@ __PACKAGE__->stats_class('Catalyst::Stats');
 
 # Remember to update this in Catalyst::Runtime as well!
 
-our $VERSION = '5.80020';
+our $VERSION = '5.80021';
 our $PRETTY_VERSION = $VERSION;
 
 $VERSION = eval $VERSION;
@@ -2151,8 +2151,14 @@ sub log_response {
     my($dump) = grep {$_->[0] eq 'Response' } $c->dump_these;
     my $response = $dump->[1];
 
-    $c->log->debug('Response Status: ' . $response->status);
-    $c->log_headers('response', $response->headers);
+	$c->log->debug(
+		sprintf(
+			'Response Code: %s; Content-Type: %s; Content-Length: %s',
+			$response->status                            || 'unknown',
+			$response->headers->header('Content-Type')   || 'unknown',
+			$response->headers->header('Content-Length') || 'unknown'
+		)
+	);
 }
 
 =head2 $c->log_request_parameters( query => {}, body => {} )