5 use Test::More qw(no_plan);
14 dies_ok { MTITest->source('Foo')->view_definition }
15 "Can't generate view def without connected schema";
17 #my $schema = MTITest->connect('dbi:SQLite::memory:');
19 my $schema = MTITest->connect( 'dbi:Pg:dbname=mti', 'postgres', '' );
22 #diag("MTITest view definition: ", $schema->resultset('Bar')->result_source->view_definition);
23 my $dir = "t/sql"; # tempdir(CLEANUP => 0);
25 $schema->create_ddl_dir( ['PostgreSQL'], 0.1, $dir );
26 $schema->deploy( { add_drop_table => 1, add_drop_view => 1 } );
28 #diag DwarnS $schema->source($_)->view_definition for qw(Foo Bar);
29 #diag DwarnS $schema->source($_) for qw(Foo Bar);