--- a/hedgewars/uGearsList.pas	Fri Apr 03 15:20:08 2015 -0400
+++ b/hedgewars/uGearsList.pas	Fri Apr 03 16:39:09 2015 -0400
@@ -237,7 +237,8 @@
                 end;
   gtMelonPiece: begin
                 gear^.AdvBounce:= 1;
-                gear^.Density:= _2
+                gear^.Density:= _2;
+                gear^.Radius:= 4
                 end;
     gtHedgehog: begin
                 gear^.AdvBounce:= 1;