|
|
|
@ -1,9 +1,12 @@
|
|
|
|
|
use Sipwise::Base;
|
|
|
|
|
use blib 'blib';
|
|
|
|
|
use File::ShareDir qw(dist_file);
|
|
|
|
|
use Module::Runtime qw(use_module);
|
|
|
|
|
use Test::Fatal qw(exception);
|
|
|
|
|
use Test::More import => [qw(done_testing ok)];
|
|
|
|
|
|
|
|
|
|
ok use_module('NGCP::Schema::Config')->instance->config_file('t/test.conf'), 'config';
|
|
|
|
|
my $config_location = dist_file('NGCP-Schema', 'test.conf');
|
|
|
|
|
ok use_module('NGCP::Schema::Config')->instance->config_file($config_location), 'config';
|
|
|
|
|
ok(my $class = use_module('NGCP::Schema'), 'load schema');
|
|
|
|
|
ok(my $schema = $class->connect, 'connect');
|
|
|
|
|
for my $source (sort $schema->sources) {
|
|
|
|
|