xchat-fixperlui.patch

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