commit | d506de020881f6489d06bacfef33b59edd113bd1 | [log] [tgz] |
---|---|---|
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 [diff] [blame] |
Fix a bug in the permutations.test script. FossilOrigin-Name: 3b20ad03be55613d922d81aec5313327bf4098b9
diff --git a/test/tester.tcl b/test/tester.tcl index 6d0f6ab..906f69e 100644 --- a/test/tester.tcl +++ b/test/tester.tcl
@@ -308,8 +308,8 @@ } if {!$go} return - if {[info exists ::G(perm:name)]} { - set name "$::G(perm:name)$name" + if {[info exists ::G(perm:prefix)]} { + set name "$::G(perm:prefix)$name" } incr_ntest