--- Coro-Mysql/Mysql.pm 2012/10/11 03:21:49 1.14 +++ Coro-Mysql/Mysql.pm 2014/06/03 03:08:34 1.18 @@ -107,7 +107,7 @@ sub writable { &Coro::Handle::FH::writable } BEGIN { - our $VERSION = '1.21'; + our $VERSION = '1.24'; require XSLoader; XSLoader::load Coro::Mysql::, $VERSION; @@ -147,7 +147,8 @@ $fh = Coro::Handle::unblock ($fh); } - _patch $sock, $DBH->{sockfd}, $DBH->{mysql_clientversion}, $fh, tied ${$fh}; + warn "$sock,$DBH->{sockfd},$DBH->{mysql_clientversion},$fh\n";#d# + _patch $sock, $DBH->{sockfd}, $DBH->{mysql_clientversion}, $fh, tied *$$fh; } $DBH