[Catalyst] [PATCH] Catalyst::DispatchType::Chained (5.7101, 5.80001)

[Oleg Kostyuk]

This bug is present in 5.7101: created Text::SimpleTable with 3
columns, while we need only two.

======================================================================
--- Catalyst/DispatchType/Chained.pm.orig       2009-04-20
04:48:31.000000000 +0300
+++ Catalyst/DispatchType/Chained.pm    2009-04-20 04:57:43.000000000 +0300
@@ -46,7 +46,7 @@

     my $column_width = Catalyst::Utils::term_width() - 35 - 9;
     my $paths = Text::SimpleTable->new(
-       [ 35, 'Path Spec' ], [ 36, 'Private' ], [ $column_width, 'Private' ]
+       [ 35, 'Path Spec' ], [ $column_width, 'Private' ]
     );

     ENDPOINT: foreach my $endpoint (
======================================================================


As I see, we don't have this error in 5.80001, but we have other error
nearly to same place:
======================================================================
--- Chained.pm.orig     2009-04-20 05:10:24.000000000 +0300
+++ Chained.pm  2009-04-20 05:11:17.000000000 +0300
@@ -86,7 +86,7 @@

     my $has_unattached_actions;
     my $unattached_actions = Text::SimpleTable->new(
-        [ 35, 'Private' ], [ 36, 'Missing parent' ],
+        [ 35, 'Private' ], [ $column_width, 'Missing parent' ],
     );

     ENDPOINT: foreach my $endpoint (
======================================================================


PS: probably, it's needed to check all other places, that use Text::SimpleTable

-- 
Sincerely yours,
Oleg Kostyuk (CUB-UANIC)