--- cvsroot/AnyEvent-MP/MP.pm 2012/02/29 18:44:59 1.122 +++ cvsroot/AnyEvent-MP/MP.pm 2012/03/01 19:37:59 1.123 @@ -84,8 +84,9 @@ =item port ID - C -A port ID is the concatenation of a node ID, a hash-mark (C<#>) as -separator, and a port name (a printable string of unspecified format). +A port ID is the concatenation of a node ID, a hash-mark (C<#>) +as separator, and a port name (a printable string of unspecified +format created by AnyEvent::MP). =item node @@ -390,7 +391,7 @@ } sub port(;&) { - my $id = "$UNIQ." . ++$ID; + my $id = $UNIQ . ++$ID; my $port = "$NODE#$id"; rcv $port, shift || \&_kilme; @@ -787,7 +788,7 @@ sub spawn(@) { my ($nodeid, undef) = split /#/, shift, 2; - my $id = "$RUNIQ." . ++$ID; + my $id = $RUNIQ . ++$ID; $_[0] =~ /::/ or Carp::croak "spawn init function must be a fully-qualified name, caught";