diff options
Diffstat (limited to 'test/permutations.test')
| -rw-r--r-- | test/permutations.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/test/permutations.test b/test/permutations.test index 6c02af8fb..37736feb8 100644 --- a/test/permutations.test +++ b/test/permutations.test @@ -1068,12 +1068,12 @@ proc help {} { exit -1 } -if {[info script] == $argv0} { +if {[file tail $argv0] == "permutations.test"} { proc main {argv} { if {[llength $argv]==0} { help } else { - set suite [lindex $argv 0] + set suite [file tail [lindex $argv 0]] if {[info exists ::testspec($suite)]==0} help set extra "" if {[llength $argv]>1} { set extra [list -files [lrange $argv 1 end]] } |