From: nothingmuch <nothingmuch@bd8105ee-0ff8-0310-8827-fb3f25b6796d>
Date: Wed, 14 May 2008 14:09:08 +0000 (+0000)
Subject:  r80566@dhcp117:  nothingmuch | 2008-05-14 19:50:52 +0900
X-Git-Tag: v1.003015~115
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=807af0f7ccd053082ae0cf71d41b2f83752debdb;p=p5sagit%2FDevel-REPL.git

 r80566@dhcp117:  nothingmuch | 2008-05-14 19:50:52 +0900
 STFU about uninitialized


git-svn-id: http://dev.catalyst.perl.org/repos/bast/trunk/Devel-REPL@4383 bd8105ee-0ff8-0310-8827-fb3f25b6796d
---

diff --git a/lib/Devel/REPL/Plugin/Colors.pm b/lib/Devel/REPL/Plugin/Colors.pm
index 17592b8..2fc6e93 100644
--- a/lib/Devel/REPL/Plugin/Colors.pm
+++ b/lib/Devel/REPL/Plugin/Colors.pm
@@ -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, @_),