Recognize "Short joins" in mIRC6 and mIRC6hack

docs/Changelog

@@ -6,6 +6,7 @@ pisg (0.65) - ??
      for the report, SF tracker #1155433).
    * Add channel owner (~) and admin (&) chars in various parsers (reported by
      Scelt in SF tracker #1170470).
+   * Recognize "Short joins" in mIRC6 and mIRC6hack (thanks, coaster).
    The "Christoph got bored in Ireland" changes:
    * Get channel music charts with ShowCharts and ChartsHistory (suggested by
      Sven in SF tracker #1164596).

modules/Pisg/Parser/Format/mIRC6.pm

@@ -78,6 +78,9 @@ sub thirdline
         } elsif ($#line == 4 && ($line[2].$line[3]) eq 'hasjoined') {
             $hash{newjoin} = $line[0];
 
+        } elsif ($line[0] eq 'Joins:') { # Alt+O -> IRC -> Options -> Short join/parts
+            $hash{newjoin} = $line[1];
+
         } elsif ($#line == 5 && ($line[2].$line[3]) eq 'nowknown') {
             $hash{newnick} = $line[5];
 

modules/Pisg/Parser/Format/mIRC6hack.pm

@@ -109,6 +109,9 @@ sub thirdline
         } elsif ($#line == 4 && ($line[2].$line[3]) eq 'hasjoined') {
             $hash{newjoin} = $line[0];
 
+        } elsif ($line[0] eq 'Joins:') { # Alt+O -> IRC -> Options -> Short join/parts
+            $hash{newjoin} = $line[1];
+
         } elsif ($#line == 5 && ($line[2].$line[3]) eq 'nowknown') {
             $hash{newnick} = $line[5];