Thread: [poe-commits] poe/POE/Wheel FollowTail.pm,1.36,1.37
Brought to you by:
rcaputo
From: <rc...@us...> - 2002-09-28 02:53:29
|
Update of /cvsroot/poe/poe/POE/Wheel In directory usw-pr-cvs1:/tmp/cvs-serv31703/POE/Wheel Modified Files: FollowTail.pm Log Message: Be more conscientious about cleaning up when FollowTail is destroyed. Index: FollowTail.pm =================================================================== RCS file: /cvsroot/poe/poe/POE/Wheel/FollowTail.pm,v retrieving revision 1.36 retrieving revision 1.37 diff -C2 -d -r1.36 -r1.37 *** FollowTail.pm 28 Sep 2002 00:20:56 -0000 1.36 --- FollowTail.pm 28 Sep 2002 02:53:26 -0000 1.37 *************** *** 419,424 **** sub DESTROY { my $self = shift; ! # remove tentacles from our owner $poe_kernel->select($self->[SELF_HANDLE]); if ($self->[SELF_STATE_READ]) { --- 419,426 ---- sub DESTROY { my $self = shift; ! ! # Remove our tentacles from our owner. $poe_kernel->select($self->[SELF_HANDLE]); + $poe_kernel->delay($self->[SELF_STATE_READ]); if ($self->[SELF_STATE_READ]) { |