apparently working additional parent support

[dbsrgits/DBIx-Class-ResultSource-MultipleTableInheritance.git] / t / 02view_def.t

diff --git a/t/02view_def.t b/t/02view_def.t
index 1d82d4e..e4f888f 100644 (file)
--- a/t/02view_def.t
+++ b/t/02view_def.t
@@ -1,6 +1,7 @@
 use strict;
 use warnings;
 use lib 't/lib';
+use File::Temp;
 use Test::More qw(no_plan);
 use Test::Exception;
 use Data::Dumper; $Data::Dumper::Indent = 1;
@@ -12,4 +13,10 @@ dies_ok { MTITest->source('Foo')->view_definition }
 
 my $schema = MTITest->connect('dbi:SQLite::memory:');
 
-warn $schema->source($_)->view_definition for qw(Foo Bar);
+my $dir = "t/sql"; # tempdir(CLEANUP => 0);
+
+$schema->create_ddl_dir([ 'PostgreSQL' ], 0.1, $dir);
+
+#warn $schema->source($_)->view_definition for qw(Foo Bar);
+#use Data::Dumper; $Data::Dumper::Indent = 1;
+#warn Dumper($schema->source($_)) for qw(Foo Bar);