summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2012-02-16 21:47:18 -0600
committerJesse Luehrs <doy@tozt.net>2012-02-16 22:20:38 -0600
commit7fdb5abb8bf3850248c7e5e5c4f99dff2e8751d7 (patch)
tree8c04234ea479dfaed970b43206ae6b9df582005d
parent5f3c9c1034cf2ba5cbeb852806a55827db5c63d6 (diff)
downloadbot-flowdock-irc-7fdb5abb8bf3850248c7e5e5c4f99dff2e8751d7.tar.gz
bot-flowdock-irc-7fdb5abb8bf3850248c7e5e5c4f99dff2e8751d7.zip
track nick changes on the irc side too
-rw-r--r--lib/Bot/Flowdock/IRC.pm7
1 files changed, 7 insertions, 0 deletions
diff --git a/lib/Bot/Flowdock/IRC.pm b/lib/Bot/Flowdock/IRC.pm
index d042e5f..d11fd13 100644
--- a/lib/Bot/Flowdock/IRC.pm
+++ b/lib/Bot/Flowdock/IRC.pm
@@ -170,6 +170,13 @@ around emoted => sub {
return $self->$orig($args);
};
+sub nick_change {
+ my $self = shift;
+ my ($old, $new) = @_;
+
+ $self->_say_to_flowdock("$old is now known as $new");
+}
+
sub _say_to_channel {
my $self = shift;
my ($body, $from) = @_;