X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F60dbicdump_config.t;h=48168a61ac9d7b984132889be33f4a8e8b4a0be3;hb=112415f1a0c30d7fb77412b91da7890e54b43393;hp=12c51532e1d24ecc462e87419e4bd3988549d754;hpb=ffe289c93235834aac8e8c59afbbd585ed3015d5;p=dbsrgits%2FDBIx-Class-Schema-Loader.git
diff --git a/t/60dbicdump_config.t b/t/60dbicdump_config.t
index 12c5153..48168a6 100644
--- a/t/60dbicdump_config.t
+++ b/t/60dbicdump_config.t
@@ -5,8 +5,10 @@ use warnings;
use Test::More;
use File::Path qw/make_path rmtree/;
-use DBIx::Class::Schema::Loader::Optional::Dependencies ();
use DBIx::Class::Schema::Loader::Utils 'slurp_file';
+use Try::Tiny;
+use namespace::clean;
+use DBIx::Class::Schema::Loader::Optional::Dependencies ();
use lib 't/lib';
use make_dbictest_db ();
use dbixcsl_test_dir '$tdir';
@@ -31,14 +33,17 @@ open my $fh, '>', $config_file
print $fh <<"EOF";
schema_class DBICTest::Schema
+lib t/lib
+
dsn $make_dbictest_db::dsn
- dump_directory $dump_path
- components InflateColumn::DateTime
- quiet 1
+ dump_directory $dump_path
+ components InflateColumn::DateTime
+ schema_base_class TestSchemaBaseClass
+ quiet 1
EOF
@@ -49,7 +54,7 @@ system $^X, 'script/dbicdump', $config_file;
is $? >> 8, 0,
'dbicdump executed successfully';
-my $foo = slurp_file "$dump_path/DBICTest/Schema/Result/Foo.pm";
+my $foo = try { slurp_file "$dump_path/DBICTest/Schema/Result/Foo.pm" } || '';
like $foo, qr/InflateColumn::DateTime/,
'loader options read correctly from config_file';