From 3ac0b0907a892c9db38c398d5a53ad0c47088666 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Thu, 16 Feb 2012 22:17:02 -0600 Subject: also forward along status changes --- lib/Bot/Flowdock/IRC.pm | 12 +++++++++++- 1 file changed, 11 insertions(+), 1 deletion(-) diff --git a/lib/Bot/Flowdock/IRC.pm b/lib/Bot/Flowdock/IRC.pm index fb9c1ea..0f725c7 100644 --- a/lib/Bot/Flowdock/IRC.pm +++ b/lib/Bot/Flowdock/IRC.pm @@ -121,6 +121,9 @@ sub tick { if ($type eq 'message' || $type eq 'line') { $self->flowdock_message($event); } + elsif ($type eq 'status') { + $self->flowdock_status($event); + } elsif ($type eq 'user-edit') { $self->flowdock_user_edit($event); } @@ -145,10 +148,17 @@ sub flowdock_message { my $name = $self->name_from_id($event->{user}); $self->_say_to_channel( $event->{content}, $name, - emoted => ($event->{event} eq 'line') + emoted => ($event->{event} eq 'line' || $event->{event} eq 'status') ); } +sub flowdock_status { + my $self = shift; + my ($event) = @_; + + $self->flowdock_message($event); +} + sub flowdock_user_edit { my $self = shift; my ($event) = @_; -- cgit v1.2.3-54-g00ecf