diff --git a/mps/qa/test/script/commands/index b/mps/qa/test/script/commands/index
index 1dab7a8b41f..2506f3aba56 100644
--- a/mps/qa/test/script/commands/index
+++ b/mps/qa/test/script/commands/index
@@ -8,6 +8,12 @@
 
 require "require";
 
+$index_dir = $qa_args[0];
+
+if ($index_dir) {
+ chdir($index_dir)
+}
+
 opendir(DIR, ".");
 
 @names = readdir(DIR);