Check Moo version at runtime

rporres · Sep 22, 2012 · 2bdef63 · 2bdef63
1 parent 68d7520
commit 2bdef63
Show file tree

Hide file tree

Showing 9 changed files with 9 additions and 11 deletions.
diff --git a/lib/SQL/Translator.pm b/lib/SQL/Translator.pm
@@ -1,10 +1,8 @@
 package SQL::Translator;
 
-use Moo;
+use Moo 1.000003;
 our ( $DEFAULT_SUB, $DEBUG, $ERROR );
 
-require 5.005;
-
 our $VERSION  = '0.11013';
 $DEBUG    = 0 unless defined $DEBUG;
 $ERROR    = "";

diff --git a/lib/SQL/Translator/Schema.pm b/lib/SQL/Translator/Schema.pm
@@ -26,7 +26,7 @@ returns the database structure.
 
 =cut
 
-use Moo;
+use Moo 1.000003;
 use SQL::Translator::Schema::Constants;
 use SQL::Translator::Schema::Procedure;
 use SQL::Translator::Schema::Table;

diff --git a/lib/SQL/Translator/Schema/Constraint.pm b/lib/SQL/Translator/Schema/Constraint.pm
@@ -23,7 +23,7 @@ C<SQL::Translator::Schema::Constraint> is the constraint object.
 
 =cut
 
-use Moo;
+use Moo 1.000003;
 use SQL::Translator::Schema::Constants;
 use SQL::Translator::Utils qw(ex2err throw);
 use SQL::Translator::Role::ListAttr;

diff --git a/lib/SQL/Translator/Schema/Field.pm b/lib/SQL/Translator/Schema/Field.pm
@@ -22,7 +22,7 @@ C<SQL::Translator::Schema::Field> is the field object.
 
 =cut
 
-use Moo;
+use Moo 1.000003;
 use SQL::Translator::Schema::Constants;
 use SQL::Translator::Types qw(schema_obj);
 use SQL::Translator::Utils qw(parse_list_arg ex2err throw);

diff --git a/lib/SQL/Translator/Schema/Index.pm b/lib/SQL/Translator/Schema/Index.pm
@@ -25,7 +25,7 @@ Primary and unique keys are table constraints, not indices.
 
 =cut
 
-use Moo;
+use Moo 1.000003;
 use SQL::Translator::Schema::Constants;
 use SQL::Translator::Utils qw(ex2err throw);
 use SQL::Translator::Role::ListAttr;

diff --git a/lib/SQL/Translator/Schema/Procedure.pm b/lib/SQL/Translator/Schema/Procedure.pm
@@ -27,7 +27,7 @@ stored procedures (and possibly other pieces of nameable SQL code?).
 
 =cut
 
-use Moo;
+use Moo 1.000003;
 use SQL::Translator::Utils qw(ex2err);
 use SQL::Translator::Role::ListAttr;
 use SQL::Translator::Types qw(schema_obj);

diff --git a/lib/SQL/Translator/Schema/Table.pm b/lib/SQL/Translator/Schema/Table.pm
@@ -19,7 +19,7 @@ C<SQL::Translator::Schema::Table> is the table object.
 
 =cut
 
-use Moo;
+use Moo 1.000003;
 use SQL::Translator::Utils qw(parse_list_arg ex2err throw);
 use SQL::Translator::Types qw(schema_obj);
 use SQL::Translator::Role::ListAttr;

diff --git a/lib/SQL/Translator/Schema/Trigger.pm b/lib/SQL/Translator/Schema/Trigger.pm
@@ -28,7 +28,7 @@ C<SQL::Translator::Schema::Trigger> is the trigger object.
 
 =cut
 
-use Moo;
+use Moo 1.000003;
 use SQL::Translator::Utils qw(parse_list_arg ex2err throw);
 use SQL::Translator::Types qw(schema_obj);
 use List::MoreUtils qw(uniq);

diff --git a/lib/SQL/Translator/Schema/View.pm b/lib/SQL/Translator/Schema/View.pm
@@ -23,7 +23,7 @@ C<SQL::Translator::Schema::View> is the view object.
 
 =cut
 
-use Moo;
+use Moo 1.000003;
 use SQL::Translator::Utils qw(ex2err);
 use SQL::Translator::Types qw(schema_obj);
 use SQL::Translator::Role::ListAttr;