1 files changed, 1 insertions, 1 deletions

diff --git a/TAO/tests/Bug_2869_Regression/run_test.pl b/TAO/tests/Bug_2869_Regression/run_test.pl
index 59b9248afde..f0d1b317487 100755
--- a/TAO/tests/Bug_2869_Regression/run_test.pl
+++ b/TAO/tests/Bug_2869_Regression/run_test.pl
@@ -30,7 +30,7 @@ if ($client != 0) {
 if (PerlACE::waitforfile_timed ($iorfile,
                         $PerlACE::wait_interval_for_process_creation) == -1) {
     print STDERR "ERROR: cannot find file <$iorfile>\n";
-    $SV->Kill (); $SV->TimedWait (1);
+    $CL->Kill (); $CL->TimedWait (1);
     exit 1;
 }