[Commits] 23d72bf3aa9: Close a file handle in a Perl snippet.

marko.makela at mariadb.com marko.makela at mariadb.com
Fri Mar 24 19:17:23 EET 2017

revision-id: 23d72bf3aa9b16c0b1250ed1a04bdf18eea9754a (mariadb-10.2.4-80-g23d72bf3aa9)
parent(s): cd2fe26116930220666281949fb7af81f3cc2b28
author: Marko Mäkelä
committer: Marko Mäkelä
timestamp: 2017-03-24 19:17:23 +0200

Close a file handle in a Perl snippet.

This could fix a race condition between mysqld and perl on Windows.

 mysql-test/suite/innodb/t/log_corruption.test | 1 +
 1 file changed, 1 insertion(+)

diff --git a/mysql-test/suite/innodb/t/log_corruption.test b/mysql-test/suite/innodb/t/log_corruption.test
index 2e628065199..7cfbda181e0 100644
--- a/mysql-test/suite/innodb/t/log_corruption.test
+++ b/mysql-test/suite/innodb/t/log_corruption.test
@@ -231,6 +231,7 @@ print OUT pack("H*x[212]Nx[1024]", "590DBAACFE922582", 0xc72d49c4);
 # redo log data
 print OUT pack("H*x[5]", "C0DEBA5E0022000c0000000138");
 print OUT pack("H*x[475]H*", "12860cb7809781e80006626f677573", "089C0ADA");
+close OUT or die;
 --copy_file $bugdir/ib_logfile0 $bugdir/ib_logfile
 # Anything below innodb_force_recovery=6 must find an invalid redo log.

More information about the commits mailing list