alias_remove() call in PoCo::Client::TCP

Hi,

around line 273 of PoCo::Client::TCP, there is a call to alias_remove().

    273           $kernel->alias_remove($alias) if defined $alias;

Inside an aplication I was writting, I was expecting that the alias  
would still be valid during the Disconnected event but line 273 is  
before that.
I was wondering if does anybody see a problem if we move that  
alias_remove() to the end of the callback, around line 289.
Patch attached, in case this is kosher.

patch_poco_client_tcp_alias_remove.diff
Description: Binary data

Best regards,
--
Pedro Melo
JID: xmpp:melo@xxxxxxxxxxxxxxxx