--- a/hedgewars/uLandTexture.pas	Wed Dec 10 19:44:01 2014 +0100
+++ b/hedgewars/uLandTexture.pas	Wed Dec 10 20:03:28 2014 +0100
@@ -281,8 +281,7 @@
     for x:= 0 to LANDTEXARW - 1 do
         for y:= 0 to LANDTEXARH - 1 do
             with LandTextures[x, y] do
-                if tex <> nil then
-                    FreeAndNilTexture(tex)
+                FreeAndNilTexture(tex);
 end;
 
 procedure freeModule;