* Fix parsing of energymech kick messages (thanks, optika81)

docs/Changelog

@@ -1,3 +1,6 @@
+pisg (x.xx)
+   * Fix parsing of energymech kick messages (thanks, optika81)
+
 pisg (0.55) - Sun May, 30th 2004
    * Added javabot support (thanks, Tobias Larsson)
    * Fix serious bug in mIRC/mIRC6 formats which caused lots of warnings to be

modules/Pisg/Parser/Format/energymech.pm

@@ -68,6 +68,8 @@ sub thirdline
 
         if ($#line >= 4 && ($line[1].$line[2]) eq 'waskicked') {
             $hash{kicker} = $line[4];
+            $hash{kicktext} = $3;
+            $hash{kicktext} =~ s/^[^\(]+\((.+)\)$/$1/;
 
         } elsif ($#line >= 4 && ($line[1].$line[2]) eq 'changestopic') {
             $hash{newtopic} = join(' ', @line[4..$#line]);