hedgewars/uLandTexture.pas
changeset 3513 f589230fa21b
parent 3509 d72c2219595d
child 3595 341e407e3754
--- a/hedgewars/uLandTexture.pas	Thu Jun 17 11:42:23 2010 -0400
+++ b/hedgewars/uLandTexture.pas	Thu Jun 17 19:57:51 2010 +0200
@@ -137,8 +137,9 @@
                 tex:= nil;
             end;
 
-if LandBackSurface <> nil then
-    SDL_FreeSurface(LandBackSurface);
+    if LandBackSurface <> nil then
+        SDL_FreeSurface(LandBackSurface);
+    LandBackSurface:= nil;
 end;
 
 end.