use UNIVERSAL::require;
use Catalyst::Log;
use Text::ASCIITable;
+use Text::ASCIITable::Wrap 'wrap';
__PACKAGE__->mk_classdata($_) for qw/engine log/;
}
}
}
- my $t = Text::ASCIITable->new;
+ my $t = Text::ASCIITable->new( { hide_HeadRow => 1, hide_HeadLine => 1 } );
$t->setCols('Class');
$t->setColWidth( 'Class', 75, 1 );
- $t->addRow($_) for @plugins;
+ $t->addRow( wrap( $_, 75 ) ) for @plugins;
$caller->log->debug( 'Loaded plugins', $t->draw )
if ( @plugins && $caller->debug );
=head1 SEE ALSO
-L<Catalyst::Manual>, L<Catalyst::Test>, L<Catalyst::Request>,
-L<Catalyst::Response>, L<Catalyst::Engine>
+=over 4
+
+=item L<Catalyst::Manual> - The Catalyst Manual
+
+=item L<Catalyst::Engine> - Core Engine
+
+=item L<Catalyst::Log> - The Log Class.
+
+=item L<Catalyst::Request> - The Request Object
+
+=item L<Catalyst::Response> - The Response Object
+
+=item L<Catalyst::Test> - The test suite.
+
+=back
=head1 AUTHOR