X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDevel%2FREPL%2FPlugin%2FColors.pm;h=46b30bb30490bd082cdc0b40473510e7e8d6a841;hb=9b7bfb6ac233dca407f12db47aa8dda7c9c1d338;hp=17592b84f56d973135e9ad29ac572ed8f825c63b;hpb=e22aa835df762f888ec7ff9efb2a599ebe17538e;p=p5sagit%2FDevel-REPL.git diff --git a/lib/Devel/REPL/Plugin/Colors.pm b/lib/Devel/REPL/Plugin/Colors.pm index 17592b8..46b30bb 100644 --- a/lib/Devel/REPL/Plugin/Colors.pm +++ b/lib/Devel/REPL/Plugin/Colors.pm @@ -1,8 +1,8 @@ package Devel::REPL::Plugin::Colors; -use Moose::Role; +use Devel::REPL::Plugin; use Term::ANSIColor; -use namespace::clean -except => [ 'meta' ]; +use namespace::autoclean; has normal_color => ( is => 'rw', lazy => 1, @@ -26,6 +26,7 @@ around format_error => sub { around format_result => sub { my $orig = shift; my $self = shift; + no warnings 'uninitialized'; return join "", ( color($self->normal_color), $orig->($self, @_),