From 501dd30a0b5bcaf5cfe3e98ee7436fed102f083f Mon Sep 17 00:00:00 2001 From: Elijah Perrault Date: Fri, 25 Feb 2011 20:48:45 -0700 Subject: [PATCH] Now parsing numeric 396. --- doc/CHANGELOG | 1 + lib/Proto/IRC.pm | 12 ++++++++++++ 2 files changed, 13 insertions(+) diff --git a/doc/CHANGELOG b/doc/CHANGELOG index 6d046f1..da02be2 100644 --- a/doc/CHANGELOG +++ b/doc/CHANGELOG @@ -3,6 +3,7 @@ Auto IRC Bot 3.0: Change Log 3.0 Indev =============================================================================== + * Now parsing numeric 396. * Added who() to API::IRC. * Added hook on_whoreply. * PRIVMSGs and NOTICEs that would cause a >512 bytes resulting message are diff --git a/lib/Proto/IRC.pm b/lib/Proto/IRC.pm index bafa5b9..b4993e7 100644 --- a/lib/Proto/IRC.pm +++ b/lib/Proto/IRC.pm @@ -13,6 +13,7 @@ our %RAWC = ( '005' => \&num005, '352' => \&num352, '353' => \&num353, + '396' => \&num396, '432' => \&num432, '433' => \&num433, '438' => \&num438, @@ -189,6 +190,17 @@ sub num353 { return 1; } +# Parse: Numeric:396 +# Hidden host changed. +sub num396 { + my ($svr, @ex) = @_; + + # Update our mask. + $botinfo{$svr}{mask} = $ex[3]; + + return 1; +} + # Parse: Numeric:432 # Erroneous nickname. sub num432 {