diff --git a/lib/SQL/Translator.pm b/lib/SQL/Translator.pm index 4e299f51d..9e1d0b5b8 100644 --- 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 index f77c630c9..9c190dccf 100644 --- 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 index 0fd43c130..edf8752bd 100644 --- a/lib/SQL/Translator/Schema/Constraint.pm +++ b/lib/SQL/Translator/Schema/Constraint.pm @@ -23,7 +23,7 @@ C 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 index 4adc293c3..8f943147f 100644 --- a/lib/SQL/Translator/Schema/Field.pm +++ b/lib/SQL/Translator/Schema/Field.pm @@ -22,7 +22,7 @@ C 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 index 8af8417b8..99eb38ce3 100644 --- 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 index 5f7a08912..e557bac24 100644 --- 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 index ee921580b..b256f6c74 100644 --- a/lib/SQL/Translator/Schema/Table.pm +++ b/lib/SQL/Translator/Schema/Table.pm @@ -19,7 +19,7 @@ C 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 index c0d8d38ae..9c037ca15 100644 --- a/lib/SQL/Translator/Schema/Trigger.pm +++ b/lib/SQL/Translator/Schema/Trigger.pm @@ -28,7 +28,7 @@ C 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 index c19501bf1..421b76245 100644 --- a/lib/SQL/Translator/Schema/View.pm +++ b/lib/SQL/Translator/Schema/View.pm @@ -23,7 +23,7 @@ C 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;