--- AnyEvent-Fork-RPC/RPC.pm 2013/04/18 20:04:51 1.17 +++ AnyEvent-Fork-RPC/RPC.pm 2013/04/18 20:20:42 1.18 @@ -565,7 +565,8 @@ my $guard = Guard::guard { $shutdown = 1; - $ww ||= $fh && AE::io $fh, 1, $wcb; + + $wcb->() if $fh && !$ww; }; my $id;