--- a/hedgewars/uLand.pas	Wed May 30 19:01:19 2012 +0400
+++ b/hedgewars/uLand.pas	Thu May 31 15:14:39 2012 +0400
@@ -750,9 +750,9 @@
 
 procedure freeModule;
 begin
-    Land:= nil;
-    LandPixels:= nil;
-    LandDirty:= nil;
+    SetLength(Land, 0, 0);
+    SetLength(LandPixels, 0, 0);
+    SetLength(LandDirty, 0, 0);
 end;
 
 end.