From a9291c47632f6ef97f75a3a58249d0117d985b03 Mon Sep 17 00:00:00 2001
From: pschwan <pschwan>
Date: Wed, 22 Jan 2003 17:52:50 +0000
Subject: [PATCH] cleanup after rename.pl

---
 lustre/tests/rename.pl | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/lustre/tests/rename.pl b/lustre/tests/rename.pl
index 47b8b44..241a201 100644
--- a/lustre/tests/rename.pl
+++ b/lustre/tests/rename.pl
@@ -60,4 +60,19 @@ while ($i--) {
         print STDERR "[" . $$ . "]" . ($total - $i) . " operations\n";
     }
 }
+
+$k = $dirs;
+if ($create == 0) {
+    $k = 0;
+}
+while ($k--) {
+    $path = "$mtpt$which/$k";
+    $j = $files;
+    while ($j--) {
+        unlink "$path/$j";
+    }
+    my $rc = rmdir $path;
+    print "rmdir $path failed: $!\n" if !$rc;
+}
+
 print "Done.\n";
-- 
1.8.3.1