Check for a new name for amygdale

git-svn-id: https://www.cernu.us/~pdbogen/svn/destult2@112 088b83a4-0077-4247-935c-42ec02c2848b

diff --git a/irc.pl b/irc.pl
index a57ba85..c94fe56 100644 (file)
--- a/irc.pl
+++ b/irc.pl
@@ -186,7 +186,10 @@ sub on_public {
        my $nick = $self->{ "nick" };
        $who = (split( /!/, $who, 2 ))[0];
        $msg =~ s/^$nick[ ,:]+/~/i;
-       if( $who eq "a" || $who eq "ae" ) {
+
+       # Check for a new name for Amygdale.
+       # Thanks, kyle.
+       if( $who eq "a" || $who eq "ae" || $who eq "Amygdale" ) {
                $bridged = 1;
                # Strip source tag
                $msg =~ s/^\[[^\]]*\] +//g;