diff options
| author | hobbs <hobbs> | 2002-09-02 19:27:15 (GMT) |
|---|---|---|
| committer | hobbs <hobbs> | 2002-09-02 19:27:15 (GMT) |
| commit | 861f367d8cc0e94cf430ad802ac4b47b3e1a2aaa (patch) | |
| tree | 05f76d71fb2965a8e795f7782164c495bd19efff | |
| parent | f7f35e11c73b574288df27966ff9da81e336bcd7 (diff) | |
| download | tcl-861f367d8cc0e94cf430ad802ac4b47b3e1a2aaa.zip tcl-861f367d8cc0e94cf430ad802ac4b47b3e1a2aaa.tar.gz tcl-861f367d8cc0e94cf430ad802ac4b47b3e1a2aaa.tar.bz2 | |
* tests/exec.test: marked exec-18.1 unixOnly until the Windows
incompatability (in the test, not the core) can be resolved.
| -rw-r--r-- | tests/exec.test | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/tests/exec.test b/tests/exec.test index 30bac14..e9a5511 100644 --- a/tests/exec.test +++ b/tests/exec.test @@ -11,7 +11,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: exec.test,v 1.13 2002/07/10 11:56:44 dgp Exp $ +# RCS: @(#) $Id: exec.test,v 1.14 2002/09/02 19:27:15 hobbs Exp $ package require tcltest 2 namespace import -force ::tcltest::* @@ -582,7 +582,9 @@ test exec-17.1 { inheriting standard I/O } {exec} { } {{foobar }} -test exec-18.1 { exec cat deals with weird file names} {exec} { +test exec-18.1 { exec cat deals with weird file names} {exec unixOnly} { + # This is cross-platform, but the cat isn't predictably correct on + # Windows. set f "foo\[\{blah" set path(fooblah) [makeFile {} $f] set fout [open $path(fooblah) w] |