diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2014-05-09 12:03:58 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2014-05-09 12:03:58 (GMT) |
commit | c9eee4b29ab5763b1c99d721139fa5b7180721ba (patch) | |
tree | 69dbd10c630d1f3b12ea46d522ce6e486f506d6e /tests | |
parent | 2f3a2a3308b055bd58c2b4cd80aa0202d913ada2 (diff) | |
parent | 435b75fc24a85e806029ac4159863e6bf87b6412 (diff) | |
download | tcl-c9eee4b29ab5763b1c99d721139fa5b7180721ba.zip tcl-c9eee4b29ab5763b1c99d721139fa5b7180721ba.tar.gz tcl-c9eee4b29ab5763b1c99d721139fa5b7180721ba.tar.bz2 |
Fix [3389978]: Support for paths longer than MAX_PATH on Windows.
Diffstat (limited to 'tests')
-rw-r--r-- | tests/winFCmd.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/winFCmd.test b/tests/winFCmd.test index bd50328..28257c6 100644 --- a/tests/winFCmd.test +++ b/tests/winFCmd.test @@ -1385,10 +1385,10 @@ test winFCmd-19.5 {Windows extended path names} -constraints nt -setup { list [catch { set f [open $tmpfile [list WRONLY CREAT]] close $f - } res] errormsg ;#$res + } res] $res } -cleanup { catch {file delete $tmpfile} -} -result [list 1 errormsg] +} -result [list 0 {}] test winFCmd-19.6 {Windows extended path names} -constraints nt -setup { set tmpfile [file join $::env(TEMP) tcl[string repeat x 248].tmp] set tmpfile //?/[file normalize $tmpfile] |