summaryrefslogtreecommitdiffstats
path: root/tests/socket.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2020-09-14 09:39:09 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2020-09-14 09:39:09 (GMT)
commitd0cfe30a0d61b7b9fe957c29c73ea5aa1d9f8310 (patch)
tree7bb450068eb4efbc3969ba8fff1e0a991137f3b9 /tests/socket.test
parent5bef31d2da2eb4ed8f3261ef8276cb2a3b6f3a1e (diff)
parentf0ec68f07293dac2b967d45a3697073b77688970 (diff)
downloadtcl-d0cfe30a0d61b7b9fe957c29c73ea5aa1d9f8310.zip
tcl-d0cfe30a0d61b7b9fe957c29c73ea5aa1d9f8310.tar.gz
tcl-d0cfe30a0d61b7b9fe957c29c73ea5aa1d9f8310.tar.bz2
Merge 8.6
Diffstat (limited to 'tests/socket.test')
-rw-r--r--tests/socket.test2
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/socket.test b/tests/socket.test
index ee954d6..868c17a 100644
--- a/tests/socket.test
+++ b/tests/socket.test
@@ -248,7 +248,7 @@ if {$doTestsWithRemoteServer} {
# Some tests are run only if we are doing testing against a remote server.
testConstraint doTestsWithRemoteServer $doTestsWithRemoteServer
if {!$doTestsWithRemoteServer} {
- if {[string first s $::tcltest::verbose] != -1} {
+ if {[string first s $::tcltest::verbose] >= 0} {
puts "Skipping tests with remote server. See tests/socket.test for"
puts "information on how to run remote server."
puts "Reason for not doing remote tests: $noRemoteTestReason"