Author: dylan
Date: 2004-05-27 17:02:32 -0400 (Thu, 27 May 2004)
New Revision: 172

Modified:
   trunk/poe-client/lib/POE/Component/Client/Haver.pm
Log:
Compatible with the new protocol.


Modified: trunk/poe-client/lib/POE/Component/Client/Haver.pm
===================================================================
--- trunk/poe-client/lib/POE/Component/Client/Haver.pm  2004-05-27 06:02:48 UTC 
(rev 171)
+++ trunk/poe-client/lib/POE/Component/Client/Haver.pm  2004-05-27 21:02:32 UTC 
(rev 172)
@@ -132,7 +132,6 @@
                                        event_JOIN
                                        event_PART
                                        event_MSG
-                                       event_PMSG
                                        event_USERS
                                        event_BYE
                                        event_QUIT
@@ -558,7 +557,7 @@
 
 =cut
 
-sub join {join
+sub join {
        my ($kernel, $heap, $where) = @_[KERNEL,HEAP,ARG0];
        $kernel->yield('send', 'JOIN', $where);
 }


Reply via email to