mirror of
https://github.com/percona/percona-toolkit.git
synced 2025-09-10 13:11:32 +00:00
PT-1760 DSN parser overrides values if F= was specified
This commit is contained in:
@@ -84,6 +84,14 @@ is_deeply(
|
|||||||
'Basic DSN'
|
'Basic DSN'
|
||||||
);
|
);
|
||||||
|
|
||||||
|
is_deeply(
|
||||||
|
$dp->parse('u=a,p=b,F=/something.cnf'),
|
||||||
|
{
|
||||||
|
F => '/something.cnf',
|
||||||
|
},
|
||||||
|
'Read from config overrides other params'
|
||||||
|
);
|
||||||
|
|
||||||
is_deeply(
|
is_deeply(
|
||||||
$dp->parse('S=/tmp/sock'),
|
$dp->parse('S=/tmp/sock'),
|
||||||
{ u => undef,
|
{ u => undef,
|
||||||
@@ -257,7 +265,7 @@ SKIP: {
|
|||||||
is($d->{h}, '127.0.0.1', 'Left hostname alone');
|
is($d->{h}, '127.0.0.1', 'Left hostname alone');
|
||||||
|
|
||||||
my $want = $sandbox_version lt '8.0' ? [ qw(utf8 utf8 utf8) ]: [ qw(utf8mb4 utf8mb4 utf8mb4) ];
|
my $want = $sandbox_version lt '8.0' ? [ qw(utf8 utf8 utf8) ]: [ qw(utf8mb4 utf8mb4 utf8mb4) ];
|
||||||
warn Data::Dumper::Dumper($want);
|
|
||||||
is_deeply(
|
is_deeply(
|
||||||
$dbh->selectrow_arrayref('select @@character_set_client, @@character_set_connection, @@character_set_results'),
|
$dbh->selectrow_arrayref('select @@character_set_client, @@character_set_connection, @@character_set_results'),
|
||||||
$want,
|
$want,
|
||||||
|
Reference in New Issue
Block a user