1use strict; 2use warnings; 3 4use Test::More; 5use Dancer2::Plugin::Auth::Extensible::Test 0.620; 6 7BEGIN { 8 $ENV{DANCER_CONFDIR} = 't/lib'; 9 $ENV{DANCER_ENVIRONMENT} = 'provider-database'; 10} 11 12{ 13 14 package TestApp; 15 use Path::Tiny; 16 use Dancer2; 17 use Dancer2::Plugin::Database; 18 use Dancer2::Plugin::Auth::Extensible; 19 20 BEGIN { 21 my $dbh1 = database('database1'); 22 my $dbh2 = database('database2'); 23 my $dbh3 = database('database3'); 24 my $ddl = path('t/database/testapp.ddl'); 25 26 $dbh1->do($_) 27 for split( /;/, 28 join( ';', $ddl->slurp, path('t/database/config1.sql')->slurp ) ); 29 30 $dbh2->do($_) 31 for split( /;/, 32 join( ';', $ddl->slurp, path('t/database/config2.sql')->slurp ) ); 33 34 $dbh3->do($_) 35 for split( /;/, 36 join( ';', $ddl->slurp, path('t/database/config3.sql')->slurp ) ); 37 } 38 use Dancer2::Plugin::Auth::Extensible::Test::App; 39} 40 41my $app = Dancer2->runner->psgi_app; 42is( ref $app, 'CODE', 'Got app' ); 43 44Dancer2::Plugin::Auth::Extensible::Test::runtests($app); 45 46done_testing; 47