--- AnyEvent-MP/MP.pm 2009/08/02 18:08:38 1.11 +++ AnyEvent-MP/MP.pm 2009/08/02 18:26:00 1.14 @@ -169,6 +169,7 @@ my $id = "$AnyEvent::MP::Base::UNIQ." . ++$AnyEvent::MP::Base::ID; $AnyEvent::MP::Base::PORT{$id} = sub { +# unshift @_, "$NODE#$id"; &$cb and delete $AnyEvent::MP::Base::PORT{$id}; };