File Coverage

blib/lib/DBIx/Connector/Driver/Pg.pm
Criterion Covered Total %
statement 9 15 60.0
branch n/a
condition n/a
subroutine 3 6 50.0
pod 3 3 100.0
total 15 24 62.5


line stmt bran cond sub pod time code
1 2     2   2707 use strict; use warnings;
  2     2   5  
  2         57  
  2         12  
  2         4  
  2         88  
2              
3             package DBIx::Connector::Driver::Pg;
4              
5 2     2   12 use DBIx::Connector::Driver;
  2         4  
  2         316  
6              
7             our $VERSION = '0.57';
8             our @ISA = qw( DBIx::Connector::Driver );
9              
10             sub savepoint {
11 0     0 1   my ($self, $dbh, $name) = @_;
12 0           $dbh->pg_savepoint($name);
13             }
14              
15             sub release {
16 0     0 1   my ($self, $dbh, $name) = @_;
17 0           $dbh->pg_release($name);
18             }
19              
20             sub rollback_to {
21 0     0 1   my ($self, $dbh, $name) = @_;
22 0           $dbh->pg_rollback_to($name);
23             }
24              
25             1;
26              
27             __END__