Fix parsing of energymech modes.

docs/Changelog

@@ -1,5 +1,5 @@
 pisg (x.xx)
-   * Fix parsing of energymech kick messages (thanks, optika81)
+   * Fix parsing of energymech kick messages and modes (thanks, optika81)
 
 pisg (0.55) - Sun May, 30th 2004
    * Added javabot support (thanks, Tobias Larsson)

modules/Pisg/Parser/Format/energymech.pm

@@ -78,6 +78,7 @@ sub thirdline
 
         } elsif ($#line >= 4 && ($line[1].$line[2]) eq 'setsmode:') {
             $hash{newmode} = $line[3];
+            $hash{modechanges} = join(" ", splice(@line, 4));
 
         } elsif ($#line >= 1 && $line[0] eq 'Joins:') {
             $hash{nick} = $line[1];