X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst.pm;h=13b975f00c0d60b4f74e623ed20bbe31fc5cfa75;hb=14a1ceeffe74d8c24dc270238f4069915270a6e5;hp=bb2bad525f1b803fe3f4f79a19aa747847850936;hpb=75b658164c8db8bec31f4d29f198402d6f6bc110;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm index bb2bad5..13b975f 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.80021'; +our $VERSION = '5.80022'; our $PRETTY_VERSION = $VERSION; $VERSION = eval $VERSION; @@ -2278,7 +2278,8 @@ sub log_headers { return unless $c->debug; - my $t = Text::SimpleTable->new( [ 35, 'Header Name' ], [ 40, 'Value' ] ); + my $column_width = Catalyst::Utils::term_width() - 28; + my $t = Text::SimpleTable->new( [ 15, 'Header Name' ], [ $column_width, 'Value' ] ); $headers->scan( sub { my ( $name, $value ) = @_;