X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FDevel-REPL.git;a=blobdiff_plain;f=lib%2FDevel%2FREPL%2FError.pm;h=69c975f4a17279286e4b2ad749683c2736901d0a;hp=ac7bc05b8a0589c5c03da31460f0363f09d3627d;hb=moo;hpb=9b7bfb6ac233dca407f12db47aa8dda7c9c1d338

diff --git a/lib/Devel/REPL/Error.pm b/lib/Devel/REPL/Error.pm
index ac7bc05..69c975f 100644
--- a/lib/Devel/REPL/Error.pm
+++ b/lib/Devel/REPL/Error.pm
@@ -1,18 +1,19 @@
 #!/usr/bin/perl
 
 package Devel::REPL::Error;
-use Moose;
+use Moo;
+use MooX::Types::MooseLike::Base qw(Str Object AnyOf);
 
 # FIXME get nothingmuch to refactor and release his useful error object
 
 has type => (
-  isa => "Str",
+  isa => Str,
   is  => "ro",
   required => 1,
 );
 
 has message => (
-  isa => "Str|Object",
+  isa => AnyOf[Str, Object],
   is  => "ro",
   required => 1,
 );