Fix for nested subdirs

git-svn-id: svn://svn.valgrind.org/valgrind/trunk@6343

diff --git a/perf/vg_perf.in b/perf/vg_perf.in
index 8f859027e4e79c3429a26db782b1ecb9d70fdb4a..129d8c491df2ba0def1ca0d1c374e02edf87fe59 100644 (file)
--- a/perf/vg_perf.in
+++ b/perf/vg_perf.in
@@ -353,6 +353,8 @@ sub test_one_dir($$)
     my ($dir, $prev_dirs) = @_;
     $dir =~ s/\/$//;    # trim a trailing '/'
 
+    chomp(my $initial_dir = `pwd`);     # record where we started
+
     # Ignore dirs into which we should not recurse.
     if ($dir =~ /^(BitKeeper|CVS|SCCS|docs|doc)$/) { return; }
 
@@ -379,7 +381,7 @@ sub test_one_dir($$)
         print "-- Finished tests in $full_dir $dashes\n";
     }
 
-    chdir("..");
+    chdir("$initial_dir");
 }
 
 #----------------------------------------------------------------------------