diff --git a/tests/support/server.tcl b/tests/support/server.tcl index edcbbcc5..9f92ce31 100644 --- a/tests/support/server.tcl +++ b/tests/support/server.tcl @@ -236,7 +236,7 @@ proc start_server {options {code undefined}} { # find out the pid while {![info exists pid]} { - regexp {\[(\d+)\]} [exec cat $stdout] _ pid + regexp {PID:\s(\d+)} [exec cat $stdout] _ pid after 100 }