--- a/hedgewars/uLand.pas	Tue Mar 23 21:50:26 2010 +0000
+++ b/hedgewars/uLand.pas	Tue Mar 23 21:58:23 2010 +0000
@@ -857,11 +857,12 @@
 procedure initModule;
 begin
     LandBackSurface:= nil;
+    FillChar(LandPixels, sizeof(TLandArray), 0);
 end;
 
 procedure freeModule;
 begin
-    FillChar(LandPixels, sizeof(TLandArray), 0)
+
 end;
 
 end.