Initial connect timeout not being observed

Steps:

1) Set the timeout to something small (say, 1 second)
2) Suspend the mock server
3) Try to connect to the mock

This will hang the client until an actual connection error is received (or possibly is never received). The perl tests die with a SIGALRM in this case.

note "Suspending mock server";
$mock->suspend_process();
$cbo->timeout(2);
ok(!$cbo->connect(), "Connect failed");

Needless to say, $cbo->connect() stalls.