From: Justin Hunter Date: Mon, 17 Aug 2009 18:35:04 +0000 (-0700) Subject: add Translator type X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1c3557654a365adf2563b4407f7a822a298838c9;p=dbsrgits%2FSQL-Translator-2.0-ish.git add Translator type --- diff --git a/lib/SQL/Translator/Types.pm b/lib/SQL/Translator/Types.pm index 780cda1..182636a 100644 --- a/lib/SQL/Translator/Types.pm +++ b/lib/SQL/Translator/Types.pm @@ -1,7 +1,7 @@ use MooseX::Declare; class SQL::Translator::Types { use MooseX::Types::Moose qw(ArrayRef CodeRef Int Maybe Str Undef); - use MooseX::Types -declare, [qw(Column Constraint ForeignKey Index PrimaryKey Procedure Schema Sequence Table Trigger View DBIHandle ColumnSize Parser Producer)]; + use MooseX::Types -declare, [qw(Column Constraint ForeignKey Index PrimaryKey Procedure Schema Sequence Table Trigger View DBIHandle ColumnSize Parser Producer Translator)]; class_type Column, { class => 'SQL::Translator::Object::Column' }; class_type Constraint, { class => 'SQL::Translator::Object::Constraint' }; @@ -17,6 +17,7 @@ class SQL::Translator::Types { class_type Parser, { class => 'SQL::Translator::Parser' }; class_type Producer, { class => 'SQL::Translator::Producer' }; + class_type Translator, { class => 'SQL::Translator' }; subtype ColumnSize, as ArrayRef[Int]; coerce ColumnSize,