--- xchat-2.0.4/plugins/perl/perl.c	2003-05-24 19:52:24.000000000 +1000
+++ xchat-2.0.4p1/plugins/perl/perl.c	2003-08-03 03:33:28.000000000 +1000
@@ -619,7 +619,7 @@
 		{
 			nick = xchat_list_str (ph, list, "nick");
 
-			if (xchat_nickcmp (ph, (char *)nick, (char *)find_nick))
+			if (xchat_nickcmp (ph, (char *)nick, (char *)find_nick) == 0)
 			{
 				XST_mPV (i, nick);
 				i++;