merge 48806

mysql-test/lib/My/SafeProcess.pm

@@ -81,10 +81,13 @@ sub is_child {
 }
 
 
-# Find the safe process binary or script
 my @safe_process_cmd;
 my $safe_kill;
-if (IS_WIN32PERL or IS_CYGWIN){
+
+# Find the safe process binary or script
+sub find_bin {
+  if (IS_WIN32PERL or IS_CYGWIN)
+  {
     # Use my_safe_process.exe
     my $exe= my_find_bin(".", ["lib/My/SafeProcess", "My/SafeProcess"],
 			 "my_safe_process");
@@ -92,13 +95,14 @@ if (IS_WIN32PERL or IS_CYGWIN){
 
     # Use my_safe_kill.exe
     $safe_kill= my_find_bin(".", "lib/My/SafeProcess", "my_safe_kill");
-}
-else
-{
+  }
+  else
+  {
     # Use my_safe_process
     my $exe= my_find_bin(".", ["lib/My/SafeProcess", "My/SafeProcess"],
 			 "my_safe_process");
     push(@safe_process_cmd, $exe);
+  }
 }
 
 

mysql-test/mysql-test-run.pl

@@ -266,6 +266,9 @@ sub main {
 
   command_line_setup();
 
+  # --help will not reach here, so now it's safe to assume we have binaries
+  My::SafeProcess::find_bin();
+
   if ( $opt_gcov ) {
     gcov_prepare($basedir);
   }