X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FRunnable%2FInvocation.pm;fp=lib%2FMooseX%2FRunnable%2FInvocation.pm;h=b21617c24db655efa4e71bff71493e9496e89265;hb=1924178262e396bcb9cb649a894ca31647e9c231;hp=3ebc1b1258b2cb7ce2464a3987149362496f0c2e;hpb=6568c67dc4decc059123a6e6c83d450bf19e2b58;p=gitmo%2FMooseX-Runnable.git

diff --git a/lib/MooseX/Runnable/Invocation.pm b/lib/MooseX/Runnable/Invocation.pm
index 3ebc1b1..b21617c 100644
--- a/lib/MooseX/Runnable/Invocation.pm
+++ b/lib/MooseX/Runnable/Invocation.pm
@@ -3,6 +3,7 @@ use Moose;
 use MooseX::Types -declare => ['RunnableClass'];
 use MooseX::Types::Moose qw(Str HashRef ArrayRef);
 use List::MoreUtils qw(uniq);
+use Params::Util qw(_CLASS);
 use namespace::autoclean;
 
 require Class::MOP;
@@ -12,7 +13,7 @@ require Class::MOP;
 
 subtype RunnableClass,
   as Str,
-  where { $_ =~ /^[:A-Za-z_]+$/ };
+  where { _CLASS($_) };
 
 
 with 'MooseX::Runnable'; # this class technically follows