commit d506de020881f6489d06bacfef33b59edd113bd1
author dan <dan@noemail.net> Sat Jul 03 13:59:01 2010 +0000
committer dan <dan@noemail.net> Sat Jul 03 13:59:01 2010 +0000
tree cf91c3ad2fbfbc3edb4d3b477db19f28cd6b9e7a
parent c844a0368a490c7ba505570525323b693ce7a006

Fix a bug in the permutations.test script.

FossilOrigin-Name: 3b20ad03be55613d922d81aec5313327bf4098b9

test/permutations.test

diff --git a/test/permutations.test b/test/permutations.test
index 67be583..ffd14c6 100644
--- a/test/permutations.test
+++ b/test/permutations.test
@@ -788,7 +788,8 @@
 proc run_tests {name args} {
   array set options $args
 
-  set ::G(perm:name)         $options(-prefix)
+  set ::G(perm:name)         $name
+  set ::G(perm:prefix)       $options(-prefix)
   set ::G(perm:presql)       $options(-presql)
   set ::G(isquick)           1
 
@@ -801,6 +802,7 @@
   uplevel $options(-shutdown)
 
   unset ::G(perm:name)
+  unset ::G(perm:prefix)
   unset ::G(perm:presql)
 }