فهرست منبع

Fix bug in mIRC6 format where it didn't recognize logfiles logging seconds, or kicks of the maintainer

sbingner 23 سال پیش
والد
کامیت
ba7e7af0e7
2فایلهای تغییر یافته به همراه5 افزوده شده و 3 حذف شده
  1. 2 0
      docs/Changelog
  2. 3 3
      modules/Pisg/Parser/Format/mIRC6.pm

+ 2 - 0
docs/Changelog

@@ -10,6 +10,8 @@ pisg (x.xx)
    * Add modified version of patch from minicus - allows browser to split words
      at QuoteWidth number of characters into any given word, without splitting
      URL's (new config option)
+   * Fix bug in mIRC6 format where it didn't recognize logfiles logging seconds
+   * Fix bug in mIRC6 format where it didn't recognize kicks of the maintainer
 
 pisg (0.44) - Sun Dec, 15th 2002
    * Fixed an error in the mIRC6 format which caused pisg to abort on some

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

@@ -10,8 +10,8 @@ sub new
     my ($type, %args) = @_;
     my $self = {
         cfg => $args{cfg},
-        normalline => '^\[(\d+):\d+\] <([^>]+)> (.*)',
-        thirdline  => '^\[(\d+):(\d+)\] \* (.+)'
+        normalline => '^\[(\d+):\d+:?\d*\] <([^>]+)> (.*)',
+        thirdline  => '^\[(\d+):(\d+):?\d*\] \* (.+)'
     };
 
     bless($self, $type);
@@ -62,7 +62,7 @@ sub thirdline
 
         } elsif ($#line >= 4 && ($line[1].$line[2]) eq 'werekicked' && ($line[$#line] =~ /\)$/)) {
                 $hash{kicker} = $line[4];
-                $hash{nick} = $self->{cfg}{botnick};
+                $hash{nick} = $self->{cfg}{maintainer};
 
         } elsif ($#line >= 4 && ($line[1] eq 'changes') && ($line[$#line] =~ /\'$/)) {
                 $hash{newtopic} = join(' ', @line[4..$#line]);