add Translator type
Justin Hunter [Mon, 17 Aug 2009 18:35:04 +0000 (11:35 -0700)]
lib/SQL/Translator/Types.pm

index 780cda1..182636a 100644 (file)
@@ -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,