handle types correctly

[dbsrgits/SQL-Translator-2.0-ish.git] / lib / SQL / Translator / Object / Schema.pm

diff --git a/lib/SQL/Translator/Object/Schema.pm b/lib/SQL/Translator/Object/Schema.pm
index 4668ae0..babad8f 100644 (file)
--- a/lib/SQL/Translator/Object/Schema.pm
+++ b/lib/SQL/Translator/Object/Schema.pm
@@ -1,9 +1,10 @@
 package SQL::Translator::Object::Schema;
 use Moose;
-use SQL::Translator::Types;
+use MooseX::Types::Moose qw(ArrayRef);
+use SQL::Translator::Types qw(Procedure Table View);
 
-has 'tables' => (is => 'ro', isa => 'ArrayRef[Table]', required => 1);
-has 'views' => (is => 'ro', isa => 'ArrayRef[View]', required => 0);
-has 'procedures' => (is => 'ro', isa => 'ArrayRef[Procedure]', required => 0);
+has 'tables' => (is => 'ro', isa => ArrayRef[Table], required => 1);
+has 'views' => (is => 'ro', isa => ArrayRef[View], required => 0);
+has 'procedures' => (is => 'ro', isa => ArrayRef[Procedure], required => 0);
 
 1;