File Coverage

File:t/database-mode.t
Coverage:100.0%

linestmtbrancondsubpodtimecode
1#!/usr/bin/env perl
2
3
1
1
1
102
9
11
use strict;
4
1
1
1
10
3
10
use warnings;
5
1
1
1
109
5
18
use Test::More tests => 2;
6
1
1
1
87
4
16
use FindBin qw($Bin);
7
1
1
1
78
4
16
use File::Spec::Functions;
8
9
1
11
$ENV{APP_ROOT} = catfile($Bin, "app2");
10
11
1
1
1
76
6
17
use Railsish::Database;
12
13{
14
1
1
4
11
    my $db = Railsish::Database->new;
15
1
10
    like($db->config->{dsn}, qr/SQLite/);
16}
17
18
1
73
$ENV{RAILSISH_MODE} = "test";
19
20{
21
1
1
4
15
    my $db = Railsish::Database->new;
22
1
10
    is($db->config->{dsn}, "hash");
23}