Hello community, here is the log from the commit of package perl-DBIx-Class-DeploymentHandler for openSUSE:Factory checked in at 2015-10-14 16:44:19 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-DBIx-Class-DeploymentHandler (Old) and /work/SRC/openSUSE:Factory/.perl-DBIx-Class-DeploymentHandler.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-DBIx-Class-DeploymentHandler" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-DBIx-Class-DeploymentHandler/perl-DBIx-Class-DeploymentHandler.changes 2015-06-16 14:06:05.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.perl-DBIx-Class-DeploymentHandler.new/perl-DBIx-Class-DeploymentHandler.changes 2015-10-14 16:44:21.000000000 +0200 @@ -1,0 +2,9 @@ +Mon Oct 5 08:30:09 UTC 2015 - co...@suse.com + +- updated to 0.002217 + see /usr/share/doc/packages/perl-DBIx-Class-DeploymentHandler/Changes + + 0.002217 2015-10-04 15:05:01-07:00 America/Los_Angeles + - Document Custom Script Helper pattern + +------------------------------------------------------------------- Old: ---- DBIx-Class-DeploymentHandler-0.002216.tar.gz New: ---- DBIx-Class-DeploymentHandler-0.002217.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-DBIx-Class-DeploymentHandler.spec ++++++ --- /var/tmp/diff_new_pack.WM14gj/_old 2015-10-14 16:44:21.000000000 +0200 +++ /var/tmp/diff_new_pack.WM14gj/_new 2015-10-14 16:44:21.000000000 +0200 @@ -17,7 +17,7 @@ Name: perl-DBIx-Class-DeploymentHandler -Version: 0.002216 +Version: 0.002217 Release: 0 %define cpan_name DBIx-Class-DeploymentHandler Summary: Extensible DBIx::Class deployment ++++++ DBIx-Class-DeploymentHandler-0.002216.tar.gz -> DBIx-Class-DeploymentHandler-0.002217.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/Changes new/DBIx-Class-DeploymentHandler-0.002217/Changes --- old/DBIx-Class-DeploymentHandler-0.002216/Changes 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/Changes 2015-10-05 00:05:15.000000000 +0200 @@ -1,5 +1,8 @@ Revision history for DBIx-Class-DeploymentHandler +0.002217 2015-10-04 15:05:01-07:00 America/Los_Angeles + - Document Custom Script Helper pattern + 0.002216 2015-06-14 09:34:57-07:00 America/Los_Angeles - Use Pod::Weaver::Plugin::Ditaa to render diagram diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/MANIFEST new/DBIx-Class-DeploymentHandler-0.002217/MANIFEST --- old/DBIx-Class-DeploymentHandler-0.002216/MANIFEST 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/MANIFEST 2015-10-05 00:05:15.000000000 +0200 @@ -57,6 +57,7 @@ t/lib/DBICVersion_v2.pm t/lib/DBICVersion_v3.pm t/lib/DBICVersion_v4.pm +t/lib/SH.pm t/no-component-lib/DBICDHTest.pm t/no-component-lib/DBICVersion_v1.pm t/no-component-lib/DBICVersion_v2.pm diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/META.json new/DBIx-Class-DeploymentHandler-0.002217/META.json --- old/DBIx-Class-DeploymentHandler-0.002216/META.json 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/META.json 2015-10-05 00:05:15.000000000 +0200 @@ -67,6 +67,6 @@ "web" : "https://github.com/frioux/DBIx-Class-DeploymentHandler" } }, - "version" : "0.002216" + "version" : "0.002217" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/META.yml new/DBIx-Class-DeploymentHandler-0.002217/META.yml --- old/DBIx-Class-DeploymentHandler-0.002216/META.yml 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/META.yml 2015-10-05 00:05:15.000000000 +0200 @@ -39,4 +39,4 @@ bugtracker: https://github.com/frioux/DBIx-Class-DeploymentHandler/issues homepage: https://github.com/frioux/DBIx-Class-DeploymentHandler repository: https://github.com/frioux/DBIx-Class-DeploymentHandler.git -version: '0.002216' +version: '0.002217' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/Makefile.PL new/DBIx-Class-DeploymentHandler-0.002217/Makefile.PL --- old/DBIx-Class-DeploymentHandler-0.002216/Makefile.PL 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/Makefile.PL 2015-10-05 00:05:15.000000000 +0200 @@ -42,7 +42,7 @@ "Test::Requires" => "0.06", "aliased" => 0 }, - "VERSION" => "0.002216", + "VERSION" => "0.002217", "test" => { "TESTS" => "t/*.t t/bugs/*.t t/deploy_methods/*.t t/version_handlers/*.t t/version_storages/*.t" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/dist.ini new/DBIx-Class-DeploymentHandler-0.002217/dist.ini --- old/DBIx-Class-DeploymentHandler-0.002216/dist.ini 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/dist.ini 2015-10-05 00:05:15.000000000 +0200 @@ -2,7 +2,7 @@ author = Arthur Axel "fREW" Schmidt <frioux+c...@gmail.com> license = Perl_5 copyright_holder = Arthur Axel "fREW" Schmidt -version = 0.002216 +version = 0.002217 ; authordep Pod::Weaver::Plugin::Ditaa diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/Cookbook/CustomResultSource.pod new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/Cookbook/CustomResultSource.pod --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/Cookbook/CustomResultSource.pod 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/Cookbook/CustomResultSource.pod 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::Cookbook::CustomResultSource; -$DBIx::Class::DeploymentHandler::Cookbook::CustomResultSource::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::Cookbook::CustomResultSource::VERSION = '0.002217'; # ABSTRACT: Customize how your DBICDH versions are stored __END__ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/Dad.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/Dad.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/Dad.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/Dad.pm 2015-10-05 00:05:15.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::Dad; -$DBIx::Class::DeploymentHandler::Dad::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::Dad::VERSION = '0.002217'; # ABSTRACT: Parent class for DeploymentHandlers use Moose; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator/Deprecated.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator/Deprecated.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator/Deprecated.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator/Deprecated.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator::Deprecated; -$DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator::Deprecated::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator::Deprecated::VERSION = '0.002217'; use Moose; # ABSTRACT: (DEPRECATED) Use this if you are stuck in the past diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator/ScriptHelpers.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator/ScriptHelpers.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator/ScriptHelpers.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator/ScriptHelpers.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator::ScriptHelpers; -$DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator::ScriptHelpers::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator::ScriptHelpers::VERSION = '0.002217'; # ABSTRACT: CodeRef Transforms for common use-cases in DBICDH Migrations use strict; @@ -151,6 +151,60 @@ Note that C<$sl_opts> requires that you specify something for the C<naming> option. +=head1 CUSTOM SCRIPT HELPERS + +If you find that in your scripts you need to always pass the same arguments to +your script helpers, you may want to define a custom set of script helpers. I +am not sure that there is a better way than just using Perl and other modules +that are already installed when you install L<DBIx::Class::DeploymentHandler>. + +The following is a pattern that will get you started; if anyone has ideas on +how to make this even easier let me know. + + package MyApp::DBICDH::ScriptHelpers; + + use strict; + use warnings; + + use DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator::ScriptHelpers + dbh => { -as => '_old_dbh' }, + schema_from_schema_loader => { -as => '_old_sfsl' }; + + use Sub::Exporter::Progressive -setup => { + exports => [qw(dbh schema_from_schema_loader)], + }; + + sub dbh { + my $coderef = shift; + + _old_dbh(sub { + my ($dbh) = @_; + $dbh->do(q(SET search_path TO 'myapp_db')); + + $coderef->(@_); + }); + } + + sub schema_from_schema_loader { + my ($config, $coderef) = @_; + + $config->{naming} ||= 'v7'; + + _old_sfsl(sub { + my ($schema) = @_; + $schema->storage->dbh->do(q(SET search_path TO 'myapp_db')); + + $coderef->(@_); + }); + + } + +The above will default the naming to C<v7> when using +C<schema_from_schema_loader>. And in both cases it will set the schema for +PostgreSQL. Of course if you do that you will not be able to switch to MySQL or +something else, so I recommended looking into my L<DBIx::Introspector> to only +do that for the database in question. + =head1 AUTHOR Arthur Axel "fREW" Schmidt <frioux+c...@gmail.com> diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator; -$DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator::VERSION = '0.002217'; use Moose; # ABSTRACT: Manage your SQL and Perl migrations in nicely laid out directories diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/Deprecated.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/Deprecated.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/Deprecated.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/Deprecated.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::Deprecated; -$DBIx::Class::DeploymentHandler::Deprecated::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::Deprecated::VERSION = '0.002217'; # ABSTRACT: (DEPRECATED) Use this if you are stuck in the past use Moose; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/HandlesDeploy.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/HandlesDeploy.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/HandlesDeploy.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/HandlesDeploy.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::HandlesDeploy; -$DBIx::Class::DeploymentHandler::HandlesDeploy::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::HandlesDeploy::VERSION = '0.002217'; use Moose::Role; # ABSTRACT: Interface for deploy methods diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/HandlesVersionStorage.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/HandlesVersionStorage.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/HandlesVersionStorage.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/HandlesVersionStorage.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::HandlesVersionStorage; -$DBIx::Class::DeploymentHandler::HandlesVersionStorage::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::HandlesVersionStorage::VERSION = '0.002217'; use Moose::Role; # ABSTRACT: Interface for version storage methods diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/HandlesVersioning.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/HandlesVersioning.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/HandlesVersioning.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/HandlesVersioning.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::HandlesVersioning; -$DBIx::Class::DeploymentHandler::HandlesVersioning::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::HandlesVersioning::VERSION = '0.002217'; use Moose::Role; # ABSTRACT: Interface for version methods diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/LogImporter.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/LogImporter.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/LogImporter.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/LogImporter.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::LogImporter; -$DBIx::Class::DeploymentHandler::LogImporter::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::LogImporter::VERSION = '0.002217'; use warnings; use strict; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/LogRouter.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/LogRouter.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/LogRouter.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/LogRouter.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::LogRouter; -$DBIx::Class::DeploymentHandler::LogRouter::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::LogRouter::VERSION = '0.002217'; use Moo; use DBIx::Class::DeploymentHandler::Logger; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/Logger.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/Logger.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/Logger.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/Logger.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::Logger; -$DBIx::Class::DeploymentHandler::Logger::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::Logger::VERSION = '0.002217'; use warnings; use strict; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/Manual/CatalystIntro.pod new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/Manual/CatalystIntro.pod --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/Manual/CatalystIntro.pod 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/Manual/CatalystIntro.pod 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::Manual::CatalystIntro -$DBIx::Class::DeploymentHandler::Manual::CatalystIntro::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::Manual::CatalystIntro::VERSION = '0.002217'; # ABSTRACT: Introduction to using DBIx::Class::DeploymentHandler with a new Catalyst Project __END__ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/Manual/Intro.pod new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/Manual/Intro.pod --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/Manual/Intro.pod 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/Manual/Intro.pod 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::Manual::Intro -$DBIx::Class::DeploymentHandler::Manual::Intro::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::Manual::Intro::VERSION = '0.002217'; # ABSTRACT: Introduction to DBIx::Class::DeploymentHandler __END__ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/Types.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/Types.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/Types.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/Types.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::Types; -$DBIx::Class::DeploymentHandler::Types::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::Types::VERSION = '0.002217'; use strict; use warnings; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionHandler/DatabaseToSchemaVersions.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionHandler/DatabaseToSchemaVersions.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionHandler/DatabaseToSchemaVersions.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionHandler/DatabaseToSchemaVersions.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::VersionHandler::DatabaseToSchemaVersions; -$DBIx::Class::DeploymentHandler::VersionHandler::DatabaseToSchemaVersions::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::VersionHandler::DatabaseToSchemaVersions::VERSION = '0.002217'; use Moose; # ABSTRACT: Go straight from Database to Schema version diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionHandler/ExplicitVersions.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionHandler/ExplicitVersions.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionHandler/ExplicitVersions.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionHandler/ExplicitVersions.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::VersionHandler::ExplicitVersions; -$DBIx::Class::DeploymentHandler::VersionHandler::ExplicitVersions::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::VersionHandler::ExplicitVersions::VERSION = '0.002217'; use Moose; # ABSTRACT: Define your own list of versions to use for migrations diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionHandler/Monotonic.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionHandler/Monotonic.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionHandler/Monotonic.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionHandler/Monotonic.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::VersionHandler::Monotonic; -$DBIx::Class::DeploymentHandler::VersionHandler::Monotonic::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::VersionHandler::Monotonic::VERSION = '0.002217'; use Moose; # ABSTRACT: Obvious version progressions diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated/Component.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated/Component.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated/Component.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated/Component.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::VersionStorage::Deprecated::Component; -$DBIx::Class::DeploymentHandler::VersionStorage::Deprecated::Component::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::VersionStorage::Deprecated::Component::VERSION = '0.002217'; # ABSTRACT: (DEPRECATED) Attach this component to your schema to ensure you stay up to date use strict; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated/VersionResult.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated/VersionResult.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated/VersionResult.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated/VersionResult.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::VersionStorage::Deprecated::VersionResult; -$DBIx::Class::DeploymentHandler::VersionStorage::Deprecated::VersionResult::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::VersionStorage::Deprecated::VersionResult::VERSION = '0.002217'; # ABSTRACT: (DEPRECATED) The old way to store versions in the database use strict; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated/VersionResultSet.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated/VersionResultSet.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated/VersionResultSet.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated/VersionResultSet.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::VersionStorage::Deprecated::VersionResultSet; -$DBIx::Class::DeploymentHandler::VersionStorage::Deprecated::VersionResultSet::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::VersionStorage::Deprecated::VersionResultSet::VERSION = '0.002217'; # ABSTRACT: (DEPRECATED) Predefined searches to find what you want from the version storage use strict; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionStorage/Deprecated.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::VersionStorage::Deprecated; -$DBIx::Class::DeploymentHandler::VersionStorage::Deprecated::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::VersionStorage::Deprecated::VERSION = '0.002217'; use Moose; use DBIx::Class::DeploymentHandler::LogImporter ':log'; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionStorage/Standard/Component.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionStorage/Standard/Component.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionStorage/Standard/Component.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionStorage/Standard/Component.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::VersionStorage::Standard::Component; -$DBIx::Class::DeploymentHandler::VersionStorage::Standard::Component::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::VersionStorage::Standard::Component::VERSION = '0.002217'; # ABSTRACT: Attach this component to your schema to ensure you stay up to date use strict; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionStorage/Standard/VersionResult.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionStorage/Standard/VersionResult.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionStorage/Standard/VersionResult.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionStorage/Standard/VersionResult.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::VersionStorage::Standard::VersionResult; -$DBIx::Class::DeploymentHandler::VersionStorage::Standard::VersionResult::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::VersionStorage::Standard::VersionResult::VERSION = '0.002217'; # ABSTRACT: The typical way to store versions in the database use strict; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionStorage/Standard/VersionResultSet.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionStorage/Standard/VersionResultSet.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionStorage/Standard/VersionResultSet.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionStorage/Standard/VersionResultSet.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::VersionStorage::Standard::VersionResultSet; -$DBIx::Class::DeploymentHandler::VersionStorage::Standard::VersionResultSet::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::VersionStorage::Standard::VersionResultSet::VERSION = '0.002217'; # ABSTRACT: Predefined searches to find what you want from the version storage use strict; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionStorage/Standard.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionStorage/Standard.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/VersionStorage/Standard.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/VersionStorage/Standard.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::VersionStorage::Standard; -$DBIx::Class::DeploymentHandler::VersionStorage::Standard::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::VersionStorage::Standard::VERSION = '0.002217'; use Moose; use DBIx::Class::DeploymentHandler::LogImporter ':log'; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/WithApplicatorDumple.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/WithApplicatorDumple.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/WithApplicatorDumple.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/WithApplicatorDumple.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::WithApplicatorDumple; -$DBIx::Class::DeploymentHandler::WithApplicatorDumple::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::WithApplicatorDumple::VERSION = '0.002217'; use MooseX::Role::Parameterized; use Module::Runtime 'use_module'; use namespace::autoclean; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/WithReasonableDefaults.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/WithReasonableDefaults.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler/WithReasonableDefaults.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler/WithReasonableDefaults.pm 2015-10-05 00:05:16.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler::WithReasonableDefaults; -$DBIx::Class::DeploymentHandler::WithReasonableDefaults::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::WithReasonableDefaults::VERSION = '0.002217'; use Moose::Role; # ABSTRACT: Make default arguments to a few methods sensible diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler.pm new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler.pm --- old/DBIx-Class-DeploymentHandler-0.002216/lib/DBIx/Class/DeploymentHandler.pm 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/lib/DBIx/Class/DeploymentHandler.pm 2015-10-05 00:05:15.000000000 +0200 @@ -1,5 +1,5 @@ package DBIx::Class::DeploymentHandler; -$DBIx::Class::DeploymentHandler::VERSION = '0.002216'; +$DBIx::Class::DeploymentHandler::VERSION = '0.002217'; # ABSTRACT: Extensible DBIx::Class deployment use Moose; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/t/deploy_methods/script-helpers.t new/DBIx-Class-DeploymentHandler-0.002217/t/deploy_methods/script-helpers.t --- old/DBIx-Class-DeploymentHandler-0.002216/t/deploy_methods/script-helpers.t 2015-06-14 18:35:10.000000000 +0200 +++ new/DBIx-Class-DeploymentHandler-0.002217/t/deploy_methods/script-helpers.t 2015-10-05 00:05:15.000000000 +0200 @@ -9,6 +9,7 @@ use lib 't/lib'; +use SH dbh => { -as => 'alternate_dbh'}; use DBICVersion_v1; use DBICDHTest; @@ -17,6 +18,27 @@ my $schema = DBICVersion::Schema->connect(@connection); $schema->deploy; +subtest 'custom script helpers' => sub { + my $ran; + + ok !$SH::DBH_RAN_OUTTER, 'alternate_dbh has ...'; + ok !$SH::DBH_RAN_INNER, '... not run yet'; + + alternate_dbh(sub { + my ($dbh, $versions) = @_; + + $ran = 1; + + is($dbh, $schema->storage->dbh, 'dbh is correctly reused'); + is_deeply $versions, [1,2], 'version correctly passed'; + isa_ok($dbh, 'DBI::db'); + })->($schema, [1,2]); + + ok $ran, 'coderef ran'; + ok $SH::DBH_RAN_OUTTER, 'alternate_dbh has ...'; + ok $SH::DBH_RAN_INNER, '... run correctly'; +}; + subtest dbh => sub { my $ran; dbh(sub { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DBIx-Class-DeploymentHandler-0.002216/t/lib/SH.pm new/DBIx-Class-DeploymentHandler-0.002217/t/lib/SH.pm --- old/DBIx-Class-DeploymentHandler-0.002216/t/lib/SH.pm 1970-01-01 01:00:00.000000000 +0100 +++ new/DBIx-Class-DeploymentHandler-0.002217/t/lib/SH.pm 2015-10-05 00:05:15.000000000 +0200 @@ -0,0 +1,30 @@ +package SH; + +use strict; +use warnings; + +use DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator::ScriptHelpers + dbh => { -as => '_old_dbh' }, + schema_from_schema_loader => { -as => '_old_sfsl' }; + +use Sub::Exporter::Progressive -setup => { + exports => [qw(dbh schema_from_schema_loader)], +}; + +our $DBH_RAN_OUTTER; +our $DBH_RAN_INNER; + +sub dbh { + my ($coderef) = @_; + $DBH_RAN_OUTTER = 1; + + _old_dbh(sub { + my ($dbh) = @_; + + $DBH_RAN_INNER = 1; + + $coderef->(@_); + }); +} + +1;