hedgewars/uLand.pas
changeset 5227 17cf34724b57
parent 5225 d38211100f4d
child 5231 29a3a9309f2c
--- a/hedgewars/uLand.pas	Thu Jun 02 18:36:35 2011 -0400
+++ b/hedgewars/uLand.pas	Thu Jun 02 18:39:35 2011 -0400
@@ -1058,6 +1058,7 @@
     AddOnLandObjects(tmpsurf);
 
     LandSurface2LandPixels(tmpsurf);
+    SDL_FreeSurface(tmpsurf);
     if (cReducedQuality and rqBlurryLand) = 0 then
         for x:= leftX+2 to rightX-2 do
             for y:= topY+2 to LAND_HEIGHT-3 do