Changeset 9628

Timestamp:

12/12/09 04:51:36 (2 years ago)

Author:

submersible_toaster

Message:

add support for rendering the leave message

File:

• trunk/Padre-Plugin-Swarm/lib/Padre/Wx/Swarm/Chat.pm (modified) (2 diffs)

trunk/Padre-Plugin-Swarm/lib/Padre/Wx/Swarm/Chat.pm

@@ -188 +188 @@
         $self->accept_announce($message);
     }
+    elsif ( $message->type eq 'leave' ) {
+        $self->accept_leave( $message );
+    }
     elsif ( $message->type eq 'promote' ) {
         $self->accept_promote( $message );
@@ -244 +247 @@
     my $text = sprintf '%s promotes a chat service', $message->from;
     $self->write_user_styled( $message->from,  $text . "\n" );
+    
+}
+
+sub accept_leave {
+    my ($self,$message) = @_;
+    my $identity = $message->from;
+    $self->write_user_styled( $identity , $identity );
+    $self->write_unstyled( ' has left the swarm.' );
     
 }