From: Amiri Barksdale at Home Date: Thu, 6 Oct 2011 01:20:10 +0000 (-0700) Subject: Add version dep on SQLT, put back original BEGIN blocks on helper routines X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a4355c5388b4d476f8e9271b5225a50d0829b1a0;p=dbsrgits%2FDBIx-Class-ResultSource-MultipleTableInheritance.git Add version dep on SQLT, put back original BEGIN blocks on helper routines --- diff --git a/.gitignore b/.gitignore index 3382ecb..16ae664 100644 --- a/.gitignore +++ b/.gitignore @@ -11,3 +11,4 @@ src t/sql t/var tags +MYMETA.* diff --git a/Makefile.PL b/Makefile.PL index 34e8291..6f3556f 100644 --- a/Makefile.PL +++ b/Makefile.PL @@ -30,9 +30,9 @@ requires 'String::TT'; requires 'aliased'; requires 'namespace::autoclean'; requires 'parent'; +requires 'SQL::Translator' => '0.11010'; test_requires 'Module::Find'; -test_requires 'SQL::Translator'; auto_install; WriteAll; diff --git a/lib/DBIx/Class/ResultSource/MultipleTableInheritance.pm b/lib/DBIx/Class/ResultSource/MultipleTableInheritance.pm index dbe0f75..1b0dea0 100644 --- a/lib/DBIx/Class/ResultSource/MultipleTableInheritance.pm +++ b/lib/DBIx/Class/ResultSource/MultipleTableInheritance.pm @@ -250,7 +250,9 @@ method add_relationship ($name, $f_source, $cond, $attrs) { } BEGIN { - # Helper methods + + # helper routines + sub argify { my @names = @_; map '_' . $_, @names; @@ -294,6 +296,9 @@ BEGIN { $function$ LANGUAGE plpgsql; }; } +} + +BEGIN { sub arg_hash { my $source = shift;