--- a/hedgewars/uGearsHandlersMess.pas	Thu Dec 11 22:22:40 2014 +0100
+++ b/hedgewars/uGearsHandlersMess.pas	Thu Dec 11 21:32:24 2014 -0500
@@ -4749,7 +4749,6 @@
             if (Gear^.Health <= (initHealth div 6)) then
                 dec(Gear^.Radius)
             end;
-
     until (Gear^.Health <= 0);
 
     DeleteGear(Gear);

--- a/hedgewars/uGearsList.pas	Thu Dec 11 22:22:40 2014 +0100
+++ b/hedgewars/uGearsList.pas	Thu Dec 11 21:32:24 2014 -0500
@@ -664,7 +664,7 @@
         begin
         if ((CurrentHedgehog = nil) or (Gear <> CurrentHedgehog^.Gear)) or (CurAmmoGear = nil) or (CurAmmoGear^.Kind <> gtKamikaze) then
             Gear^.Hedgehog^.Team^.Clan^.Flawless:= false;
-        if not CheckCoordInWater(hwRound(Gear^.X), hwRound(Gear^.Y)) then
+        if CheckCoordInWater(hwRound(Gear^.X), hwRound(Gear^.Y)) then
             begin
             t:= max(Gear^.Damage, Gear^.Health);
             Gear^.Damage:= t;

--- a/hedgewars/uIO.pas	Thu Dec 11 22:22:40 2014 +0100
+++ b/hedgewars/uIO.pas	Thu Dec 11 21:32:24 2014 -0500
@@ -222,7 +222,7 @@
 repeat
     BlockRead(f, s[1], 255 - Length(ss), i);
     if i > 0 then
-    begin
+        begin
         s[0]:= char(i);
         ss:= ss + s;
         while (Length(ss) > 1)and(Length(ss) > byte(ss[1])) do