database/mariadb
1
0
Fork 0
mirror of https://github.com/MariaDB/server.git synced 2026-01-06 05:22:24 +03:00
Code Activity

Bug #53374 Don't delete temporary perl file if perl fails

Browse Source 
Simple condition on the delete stmt
But NB: next mtr run will clean up and remove the temp file
This commit is contained in:
Bjorn Munch
2010-06-07 13:30:23 +02:00
parent b7c8385e05
commit f9fa3b7a3f
1 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
client/mysqltest.cc
View File

@@ -3785,8 +3785,9 @@ void do_perl(struct st_command *command)
}
error= pclose(res_file);
/* Remove the temporary file */
my_delete(temp_file_path, MYF(0));
/* Remove the temporary file, but keep it if perl failed */
if (!error)
my_delete(temp_file_path, MYF(0));
handle_command_error(command, WEXITSTATUS(error));
}