X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FReaction%2FTypes%2FDBIC.pm;h=8f9a37d794ceb2a116f9a61b0d7ee38eb406671e;hb=4949e0ee7a1162bca838822095e6cd2da527e2d2;hp=66601c7a42de38c438af667c7b7d6e4c3f1d17c3;hpb=f670cfd0d1ce4753a2c76b27cdc01e8471e4cc4a;p=catagits%2FReaction.git

diff --git a/lib/Reaction/Types/DBIC.pm b/lib/Reaction/Types/DBIC.pm
index 66601c7..8f9a37d 100644
--- a/lib/Reaction/Types/DBIC.pm
+++ b/lib/Reaction/Types/DBIC.pm
@@ -1,5 +1,8 @@
 package Reaction::Types::DBIC;
 
+use MooseX::Types
+    -declare => [qw/ResultSet Row/];
+
 use Moose::Util::TypeConstraints;
 
 use DBIx::Class::ResultSet;
@@ -8,6 +11,9 @@ subtype 'DBIx::Class::ResultSet'
   => as 'Object'
   => where { $_->isa('DBIx::Class::ResultSet') };
 
+subtype ResultSet,
+  as 'DBIx::Class::ResultSet';
+
 use DBIx::Class::Core;
 use DBIx::Class::Row;
 
@@ -15,6 +21,9 @@ subtype 'DBIx::Class::Row'
   => as 'Object'
   => where { $_->isa('DBIx::Class::Row') };
 
+subtype Row,
+  as 'DBIx::Class::Row';
+
 1;
 
 =head1 NAME