1 files changed, 3 insertions, 3 deletions
diff --git a/examples/Advanced/ch_18/run_test.pl b/examples/Advanced/ch_18/run_test.pl
index f167dafbaec..bbf8bec9e2d 100755
--- a/examples/Advanced/ch_18/run_test.pl
+++ b/examples/Advanced/ch_18/run_test.pl
@@ -24,7 +24,7 @@ sub name_server
              "..$DIR_SEPARATOR".
              "orbsvcs$DIR_SEPARATOR".
              "Naming_Service$DIR_SEPARATOR".
-             "Naming_Service$EXE_EXT";
+             "tao_cosnaming$EXE_EXT";
   $NS = Process::Create ($prog,"");
 }
 
@@ -50,7 +50,7 @@ if ($client->TimedWait (60) == -1) {
 
 
 # gracefully kill the server
-$server->Terminate (); 
+$server->Terminate ();
 if ($server->TimedWait (5) == -1) {
   print STDERR "ERROR: cannot terminate the server\n";
   $server->Kill (); $server->TimedWait (1);
@@ -58,7 +58,7 @@ if ($server->TimedWait (5) == -1) {
 }
 
 # gracefully kill the Naming Service
-$NS->Terminate (); 
+$NS->Terminate ();
 if ($NS->TimedWait (5) == -1) {
   print STDERR "ERROR: cannot terminate the server\n";
   $NS->Kill (); $server->TimedWait (1);