--- a/hedgewars/uLandTexture.pas	Wed May 30 19:01:19 2012 +0400
+++ b/hedgewars/uLandTexture.pas	Thu May 31 15:14:39 2012 +0400
@@ -155,6 +155,6 @@
     if LandBackSurface <> nil then
         SDL_FreeSurface(LandBackSurface);
     LandBackSurface:= nil;
-    LandTextures:= nil;
+    SetLength(LandTextures, 0, 0);
 end;
 end.