--- a/hedgewars/uGears.pas	Tue Jun 21 23:24:50 2011 +0200
+++ b/hedgewars/uGears.pas	Tue Jun 21 17:28:53 2011 -0400
@@ -1292,7 +1292,7 @@
     if (GameFlags and gfSolidLand) = 0 then
         begin
         cnt:= DrawExplosion(X, Y, Radius) div 1608; // approx 2 16x16 circles to erase per chunk
-        if cnt > 0 then
+        if (cnt > 0) and (SpritesData[sprChunk].Texture <> nil) then
             for i:= 0 to cnt do
                 AddVisualGear(X, Y, vgtChunk)
         end;