= $pg->max_connections(1)->db->dbh;
is $pg->db->dbh, $dbh, 'same database handle';
isnt $pg->db->dbh, $pg->db->dbh, 'different database handles';
is $pg->db->dbh, $dbh, 'dif
$dbh = $pg->db->dbh;
is $pg->db->dbh, $dbh, 'same database handle';
$pg->db->disconnect;
isnt $pg->db->dbh, $dbh, 'different database handles';
};
subtest 'Statement cache' => sub {
my $db
T 3 AS three')->sth;
is $db->query('SELECT 3 AS three')->sth, $sth, 'same statement handle';
isnt $db->query('SELECT 4 AS four')->sth, $sth, 'different statement handles';
is $db->query('SELECT
_backend(?)', $dbhs[0]{pg_pid});
Mojo::IOLoop->start;
ok $dbhs[1], 'database handle';
isnt $dbhs[0], $dbhs[1], 'different database handles';
is_deeply \@test, ['works'], 'right message
$pg->dsn('dbi:Pg:badoption=1');
Mojo::IOLoop->start;
ok $dbhs[1], 'database handle';
isnt $dbhs[0], $dbhs[1], 'different database handles';
is_deeply \@test, ['works'], 'right me
_BACKEND(?)', $dbhs[0]{pg_pid});
Mojo::IOLoop->start;
ok $dbhs[1], 'database handle';
isnt $dbhs[0], $dbhs[1], 'different database handles';
$pg->pubsub->listen(pstest => sub { push @t