summaryrefslogtreecommitdiffstats
path: root/tests/ioCmd.test
diff options
context:
space:
mode:
authordas <das>2008-03-11 22:28:32 (GMT)
committerdas <das>2008-03-11 22:28:32 (GMT)
commit60e6cc626ebe85024897749ddc67364aa813fe9a (patch)
treef4895e075ce09959507acb217a059f3110c87de1 /tests/ioCmd.test
parentc3cb8a61ef9f7d4705827c9db2f781a2df0e3bb8 (diff)
downloadtcl-60e6cc626ebe85024897749ddc67364aa813fe9a.zip
tcl-60e6cc626ebe85024897749ddc67364aa813fe9a.tar.gz
tcl-60e6cc626ebe85024897749ddc67364aa813fe9a.tar.bz2
* macosx/GNUmakefile: fix quoting to allow paths to
* macosx/Tcl-Common.xcconfig: ${builddir} and ${INSTALL_ROOT} * unix/Makefile.in: to contain spaces. * unix/configure.in: * unix/install-sh: * unix/tcl.m4: * tests/ioCmd.test: * unix/Makefile.in (install-strip): strip non-global symbols from dynamic library.
Diffstat (limited to 'tests/ioCmd.test')
-rw-r--r--tests/ioCmd.test8
1 files changed, 4 insertions, 4 deletions
diff --git a/tests/ioCmd.test b/tests/ioCmd.test
index 088d637..2b4877f 100644
--- a/tests/ioCmd.test
+++ b/tests/ioCmd.test
@@ -13,7 +13,7 @@
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# RCS: @(#) $Id: ioCmd.test,v 1.35 2007/12/13 15:26:06 dgp Exp $
+# RCS: @(#) $Id: ioCmd.test,v 1.36 2008/03/11 22:28:34 das Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
package require tcltest 2
@@ -372,13 +372,13 @@ file delete $path(test5)
test iocmd-11.1 {I/O to command pipelines} {unixOrPc unixExecs} {
set f [open $path(test4) w]
close $f
- list [catch {open "| cat < $path(test4) > $path(test5)" w} msg] $msg $::errorCode
+ list [catch {open "| cat < \"$path(test4)\" > \"$path(test5)\"" w} msg] $msg $::errorCode
} {1 {can't write input to command: standard input was redirected} NONE}
test iocmd-11.2 {I/O to command pipelines} {unixOrPc unixExecs} {
- list [catch {open "| echo > $path(test5)" r} msg] $msg $::errorCode
+ list [catch {open "| echo > \"$path(test5)\"" r} msg] $msg $::errorCode
} {1 {can't read output from command: standard output was redirected} NONE}
test iocmd-11.3 {I/O to command pipelines} {unixOrPc unixExecs} {
- list [catch {open "| echo > $path(test5)" r+} msg] $msg $::errorCode
+ list [catch {open "| echo > \"$path(test5)\"" r+} msg] $msg $::errorCode
} {1 {can't read output from command: standard output was redirected} NONE}
test iocmd-12.1 {POSIX open access modes: RDONLY} {