ADD: more tests
This commit is contained in:
parent
eabc37d23b
commit
e851de04da
@ -95,7 +95,7 @@ sub tryToConnect
|
||||
|
||||
$self->log(LOGDEBUG, "DSN try:" . $dsn);
|
||||
|
||||
my $dbh = DBI::connect($dsn, $user , $pass );
|
||||
my $dbh = DBI->connect($dsn, $user , $pass );
|
||||
|
||||
if ($dbh->err())
|
||||
{
|
||||
@ -218,7 +218,7 @@ sub askDatabase
|
||||
}
|
||||
|
||||
my $dsn = $self->{dsn};
|
||||
my $dbh = DBI::connect($dsn, $self->{user}, $self->{pass});
|
||||
my $dbh = DBI->connect($dsn, $self->{user}, $self->{pass});
|
||||
|
||||
if ($dbh->err())
|
||||
{
|
||||
|
Loading…
Reference in New Issue
Block a user