Group
Extension

Matches 2

Mojo-Pg ( S/SR/SRI/Mojo-Pg-4.27.tar.gz, SRI, 2022; MetaCPAN )
Mojo-Pg/t/database.t ( view source; MetaCPAN )
 = $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
Mojo-Pg ( S/SR/SRI/Mojo-Pg-4.27.tar.gz, SRI, 2022; MetaCPAN )
Mojo-Pg/t/pubsub.t ( view source; MetaCPAN )
_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

Powered by Groonga
Maintained by Kenichi Ishigaki <ishigaki@cpan.org>. If you find anything, submit it on GitHub.