diff options
-rwxr-xr-x | TAO/orbsvcs/tests/Bug_1395_Regression/run_test.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/TAO/orbsvcs/tests/Bug_1395_Regression/run_test.pl b/TAO/orbsvcs/tests/Bug_1395_Regression/run_test.pl index caaa4a2f5b0..75d817be671 100755 --- a/TAO/orbsvcs/tests/Bug_1395_Regression/run_test.pl +++ b/TAO/orbsvcs/tests/Bug_1395_Regression/run_test.pl @@ -119,14 +119,14 @@ sub test_body ## the server so that it can pick up the new locator IOR unlink($server_ior_file); $SERVER->Kill (); - $SERVER->Spawn (); + $SERVER->Spawn (); if (PerlACE::waitforfile_timed ($server_ior_file, 10) == -1) { print STDERR "ERROR: cannot find $server_ior_file\n"; $ACTIVATOR->Kill (); - $LOCATOR->Kill (); - $SERVER->Kill (); + $LOCATOR->Kill (); + $SERVER->Kill (); return 1; } |