X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F105view_deps.t;h=d056e9dc64e8535dd0ba4d3e573b7d0f3e82d0b8;hb=d52d4d6e066eca4c85c5f4f6cf7b005f0dc883bc;hp=b740c58b147deceaab64a9567f43dcad7820a5b9;hpb=7c4ade2a750b5299842e8f55f5bdcd1488168867;p=dbsrgits%2FDBIx-Class.git diff --git a/t/105view_deps.t b/t/105view_deps.t index b740c58..d056e9d 100644 --- a/t/105view_deps.t +++ b/t/105view_deps.t @@ -11,13 +11,14 @@ use ViewDeps; use ViewDepsBad; BEGIN { - require DBIx::Class; - plan skip_all => - 'Test needs ' . DBIx::Class::Optional::Dependencies->req_missing_for ('deploy') - unless DBIx::Class::Optional::Dependencies->req_ok_for ('deploy'); - use_ok('DBIx::Class::ResultSource::View'); + require DBIx::Class; + plan skip_all => 'Test needs ' . + DBIx::Class::Optional::Dependencies->req_missing_for('deploy') + unless DBIx::Class::Optional::Dependencies->req_ok_for('deploy'); } +use_ok('DBIx::Class::ResultSource::View'); + #################### SANITY my $view = DBIx::Class::ResultSource::View->new; @@ -70,7 +71,9 @@ ok( $schema2, 'Connected to ViewDepsBad schema OK' ); #################### DEPLOY2 -warnings_exist { $schema2->deploy( { add_drop_table => 1 } ); } [qr/no such table: main.aba_name_artists/], "Deploying the bad schema produces a warning: aba_name_artists was not created."; +warnings_exist { $schema2->deploy( { add_drop_table => 1 } ); } +[qr/no such table: main.aba_name_artists/], + "Deploying the bad schema produces a warning: aba_name_artists was not created."; #################### DOES ORDERING WORK 2?