From 1cedebb79921bc5fa5bb1e5cbaf30ba67511df8b Mon Sep 17 00:00:00 2001 From: Matt Stancliff Date: Thu, 31 Jul 2014 14:39:49 -0400 Subject: Remove trailing spaces from tests --- tests/support/redis.tcl | 2 +- tests/support/server.tcl | 10 +++++----- 2 files changed, 6 insertions(+), 6 deletions(-) (limited to 'tests/support') diff --git a/tests/support/redis.tcl b/tests/support/redis.tcl index ad9cbe8ab..cd8ae3a34 100644 --- a/tests/support/redis.tcl +++ b/tests/support/redis.tcl @@ -18,7 +18,7 @@ # $r ping [list handlePong] # } # } -# +# # set r [redis] # $r blocking 0 # $r get fo [list handlePong] diff --git a/tests/support/server.tcl b/tests/support/server.tcl index 9f92ce31e..0e2e2982a 100644 --- a/tests/support/server.tcl +++ b/tests/support/server.tcl @@ -178,10 +178,10 @@ proc start_server {options {code undefined}} { dict set config $directive $arguments } } - + # use a different directory every time a server is started dict set config dir [tmpdir server] - + # start every server on a different port set ::port [find_available_port [expr {$::port+1}]] dict set config port $::port @@ -190,7 +190,7 @@ proc start_server {options {code undefined}} { foreach {directive arguments} [concat $::global_overrides $overrides] { dict set config $directive $arguments } - + # write new configuration to temporary file set config_file [tmpfile redis.conf] set fp [open $config_file w+] @@ -208,7 +208,7 @@ proc start_server {options {code undefined}} { } else { exec src/redis-server $config_file > $stdout 2> $stderr & } - + # check that the server actually started # ugly but tries to be as fast as possible... if {$::valgrind} {set retrynum 1000} else {set retrynum 100} @@ -233,7 +233,7 @@ proc start_server {options {code undefined}} { start_server_error $config_file $err return } - + # find out the pid while {![info exists pid]} { regexp {PID:\s(\d+)} [exec cat $stdout] _ pid -- cgit v1.2.1