You've already forked pgbackrest
mirror of
https://github.com/pgbackrest/pgbackrest.git
synced 2026-05-22 10:15:16 +02:00
Add Perl interface to C PgQuery object.
This validates that all current queries work with the new interface and removes the dependency on DBD::Pg.
This commit is contained in:
@@ -11,7 +11,6 @@ use strict;
|
||||
use warnings FATAL => qw(all);
|
||||
use Carp qw(confess);
|
||||
|
||||
use DBI;
|
||||
use Exporter qw(import);
|
||||
our @EXPORT = qw();
|
||||
use File::Basename qw(dirname);
|
||||
|
||||
@@ -11,7 +11,6 @@ use strict;
|
||||
use warnings FATAL => qw(all);
|
||||
use Carp qw(confess);
|
||||
|
||||
use DBI;
|
||||
use Exporter qw(import);
|
||||
our @EXPORT = qw();
|
||||
use Fcntl ':mode';
|
||||
|
||||
@@ -98,8 +98,7 @@ sub run
|
||||
$self->optionTestSetBool(CFGOPT_ONLINE, true);
|
||||
$self->configTestLoad(CFGCMD_STANZA_CREATE);
|
||||
|
||||
$self->testException(sub {(new pgBackRest::Stanza())}, ERROR_DB_CONNECT,
|
||||
"could not connect to server: No such file or directory\n");
|
||||
$self->testException(sub {(new pgBackRest::Stanza())}, ERROR_DB_CONNECT, "unable to connect to.*");
|
||||
|
||||
$self->optionTestSetBool(CFGOPT_ONLINE, false);
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user