diff options
Diffstat (limited to 'tests/support/server.tcl')
| -rw-r--r-- | tests/support/server.tcl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/support/server.tcl b/tests/support/server.tcl index 4c596290d..9a3733b61 100644 --- a/tests/support/server.tcl +++ b/tests/support/server.tcl @@ -537,6 +537,9 @@ proc start_server {options {code undefined}} { set fd [open $stdout "a+"] puts $fd "### Starting server for test $::cur_test" close $fd + if {$::verbose > 1} { + puts "### Starting server $stdout for test - $::cur_test" + } } # We may have a stdout left over from the previous tests, so we need |