1berry/MariaDB-server
1
0
Fork 0
Code Issues Packages Projects Releases Wiki 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 d5f2972628
commit bb6e8b6942
1 changed files with 3 additions and 2 deletions
Show Stats 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));
}