diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-14 12:58:26 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-14 12:58:26 (GMT) |
commit | 52f93c85fd4b12afc887e78f895f6dd7e33983db (patch) | |
tree | d74ab2ee0df7cc78bf444ad2267e4bcf0774861e /tests/winFCmd.test | |
parent | fa3cf75311fd2cf309675dacf20c723963b8fb19 (diff) | |
download | tcl-52f93c85fd4b12afc887e78f895f6dd7e33983db.zip tcl-52f93c85fd4b12afc887e78f895f6dd7e33983db.tar.gz tcl-52f93c85fd4b12afc887e78f895f6dd7e33983db.tar.bz2 |
Unbreak winFCmd-1.38 testcase on Windows
Diffstat (limited to 'tests/winFCmd.test')
-rw-r--r-- | tests/winFCmd.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/winFCmd.test b/tests/winFCmd.test index 517a56b..7c81e81 100644 --- a/tests/winFCmd.test +++ b/tests/winFCmd.test @@ -401,7 +401,7 @@ proc MakeFiles {dirname} { set f [open $filename w] close $f file stat $filename stat - if {[set n [lsearch -exact -integer $inodes $stat(ino)]] < 0} { + if {[set n [lsearch -exact -integer $inodes $stat(ino)]] >= 0} { return [list [file join $dirname Test$n] $filename] } lappend inodes $stat(ino) |