remove redundant check
authorsheepluva
Wed, 10 Dec 2014 20:03:28 +0100
changeset 10648 75498cfe6267
parent 10647 90062f7a3103
child 10649 d83897fed816
remove redundant check
hedgewars/uLandTexture.pas
--- 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;