1 files changed, 1 insertions, 1 deletions
diff --git a/CIAO/examples/BasicSP/descriptors/run_test.pl b/CIAO/examples/BasicSP/descriptors/run_test.pl
index 4b1d63dfb16..7abeb3551c3 100755
--- a/CIAO/examples/BasicSP/descriptors/run_test.pl
+++ b/CIAO/examples/BasicSP/descriptors/run_test.pl
@@ -78,13 +78,13 @@ sub init_ior_files {
 sub delete_ior_files {
     for ($i = 0; $i < $daemons; ++$i) {
         $tg_daemons[$i]->DeleteFile ($iorbases[$i]);
+        $tg_daemons[$i]->DeleteFile ("rategen.ior");
     }
     $tg_naming->DeleteFile ($ior_nsbase);
     $tg_exe_man->DeleteFile ($ior_embase);
     for ($i = 0; $i < $daemons; ++$i) {
         $iorfiles[$i] = $tg_daemons[$i]->LocalFile ($iorbases[$i]);
     }
-    unlink PerlACE::LocalFile ("rategen.ior");
 }
 
 sub kill_node_daemons {