Просмотр исходного кода

* Fixed some bugs in the mIRC6 format.

Morten Brix Pedersen 22 лет назад
Родитель
Сommit
08e1a03fc2
2 измененных файлов с 4 добавлено и 1 удалено
  1. 1 0
      docs/Changelog
  2. 3 1
      modules/Pisg/Parser/Format/mIRC6.pm

+ 1 - 0
docs/Changelog

@@ -1,5 +1,6 @@
 pisg (x.xx)
 pisg (x.xx)
    * Fixed a bug in the energymech format, it did not recognize join lines.
    * Fixed a bug in the energymech format, it did not recognize join lines.
+   * Fixed some bugs in the mIRC6 format.
 
 
 pisg (0.51) - Wed Jan, 21st 2004
 pisg (0.51) - Wed Jan, 21st 2004
    * Fixed a bug in the irssi format where an action could be recognized as a
    * Fixed a bug in the irssi format where an action could be recognized as a

+ 3 - 1
modules/Pisg/Parser/Format/mIRC6.pm

@@ -72,7 +72,7 @@ sub thirdline
         } elsif ($#line >= 3 && ($line[1].$line[2]) eq 'setsmode:') {
         } elsif ($#line >= 3 && ($line[1].$line[2]) eq 'setsmode:') {
             $hash{newmode} = $line[3];
             $hash{newmode} = $line[3];
 
 
-        } elsif ($#line == 3 && ($line[1].$line[2]) eq 'hasjoined') {
+        } elsif ($#line == 4 && ($line[2].$line[3]) eq 'hasjoined') {
             $hash{newjoin} = $line[0];
             $hash{newjoin} = $line[0];
 
 
         } elsif ($#line == 5 && ($line[2].$line[3]) eq 'nowknown') {
         } elsif ($#line == 5 && ($line[2].$line[3]) eq 'nowknown') {
@@ -86,6 +86,8 @@ sub thirdline
                 ($hash{saying} =~ /^Disconnected/) ||  
                 ($hash{saying} =~ /^Disconnected/) ||  
                 ($hash{saying} =~ /^\S+ has quit IRC \(.+\)/) ||  
                 ($hash{saying} =~ /^\S+ has quit IRC \(.+\)/) ||  
                 ($hash{saying} =~ /^\S+ has left \#\S+/) ||  
                 ($hash{saying} =~ /^\S+ has left \#\S+/) ||  
+                ($hash{saying} =~ /^\S+\s\S+ has left \#\S+/) ||
+                ($hash{saying} =~ /^\S+\s\S+ Quit \S+/) ||
                 ($hash{saying} eq "You're not channel operator") ||
                 ($hash{saying} eq "You're not channel operator") ||
                 ($hash{nick} eq 'Attempting' && $hash{saying} =~ /^to rejoin channel/) ||  
                 ($hash{nick} eq 'Attempting' && $hash{saying} =~ /^to rejoin channel/) ||  
                 ($hash{nick} eq 'Rejoined' && $hash{saying} =~ /^channel/) ||  
                 ($hash{nick} eq 'Rejoined' && $hash{saying} =~ /^channel/) ||