hedgewars/uLand.pas
changeset 3046 d54b2c718971
parent 3045 41732f986b4f
child 3048 755f484d0f62
--- a/hedgewars/uLand.pas	Mon Mar 22 17:48:19 2010 +0000
+++ b/hedgewars/uLand.pas	Mon Mar 22 17:59:59 2010 +0000
@@ -862,6 +862,8 @@
 procedure freeModule;
 begin
     FillChar(LandPixels, sizeof(TLandArray), 0);
+    // TODO - Find out why unc0rr removed this since it will leak
+    if LandBackSurface <> nil then SDL_FreeSurface(LandBackSurface);
 end;
 
 end.