summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2012-02-16 21:19:46 -0600
committerJesse Luehrs <doy@tozt.net>2012-02-16 21:25:18 -0600
commita144dd627311a71798b43b081e406bb16004562e (patch)
tree52388395bacf2d85fbca818104ea9b34025cd695
parentc8d5bd0f07dc4fe91396eada4d7d10e4f1787cf3 (diff)
downloadbot-flowdock-irc-a144dd627311a71798b43b081e406bb16004562e.tar.gz
bot-flowdock-irc-a144dd627311a71798b43b081e406bb16004562e.zip
handle flowdock nick renaming
-rw-r--r--lib/Bot/Flowdock/IRC.pm11
1 files changed, 11 insertions, 0 deletions
diff --git a/lib/Bot/Flowdock/IRC.pm b/lib/Bot/Flowdock/IRC.pm
index a70414f..b929789 100644
--- a/lib/Bot/Flowdock/IRC.pm
+++ b/lib/Bot/Flowdock/IRC.pm
@@ -141,6 +141,17 @@ sub flowdock_message {
sub flowdock_user_edit {
my $self = shift;
my ($event) = @_;
+
+ my $id = $event->{user};
+ my $nick = $event->{content}{user}{nick};
+ my $oldnick = $self->name_from_id($id);
+
+ $self->say(
+ channel => ($self->channels)[0],
+ body => "* $oldnick is now known as $nick",
+ );
+
+ $self->_id_map->{$id} = $nick;
}
sub said {