summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-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 {