handle types correctly
[dbsrgits/SQL-Translator-2.0-ish.git] / lib / SQL / Translator / Object / Table.pm
index 4037ff0..da83e8e 100644 (file)
@@ -1,10 +1,11 @@
 package SQL::Translator::Object::Table;
 use Moose;
-use SQL::Translator::Types;
+use MooseX::Types::Moose qw(ArrayRef Str);
+use SQL::Translator::Types qw(Column Constraint Index);
 
-has 'name' => (is => 'ro', isa => 'Str', required => 1);
-has 'columns' => (is => 'ro', isa => 'ArrayRef[Column]', required => 1);
-has 'indexes' => (is => 'ro', isa => 'ArrayRef[Index]', required => 0);
-has 'constraints' => (is => 'ro', isa => 'ArrayRef[Constraint]', required => 0);
+has 'name' => (is => 'ro', isa => Str, required => 1);
+has 'columns' => (is => 'ro', isa => ArrayRef[Column], required => 1);
+has 'indexes' => (is => 'ro', isa => ArrayRef[Index], required => 0);
+has 'constraints' => (is => 'ro', isa => ArrayRef[Constraint], required => 0);
 
 1;