PT-2340 - Support MySQL 8.4

- Adjusted t/pt-deadlock-logger/check_schema_exists.t so it makes sense
This commit is contained in:
Sveta Smirnova
2024-10-04 18:32:39 +03:00
parent 33086769a1
commit e4281dc6c2

View File

@@ -19,7 +19,7 @@ my $dp = new DSNParser(opts=>$dsn_opts);
my $sb = new Sandbox(basedir => '/tmp', DSNParser => $dp);
my $dbh = $sb->get_dbh_for('source');
my ($output, $exist_status) = full_output(
my ($output, $exit_status) = full_output(
sub {
pt_deadlock_logger::main(
"h=127.1,D=non_existent_db,u=msandbox,p=msandbox",
@@ -29,6 +29,17 @@ my ($output, $exist_status) = full_output(
}
);
is(
$exit_status,
2,
'Dies when connects to non existent database'
);
like(
$output,
qr/Unknown database 'non_existent_db'/,
'Error printed when connects to non existent database'
);
# #############################################################################
# Done.
# #############################################################################