hedgewars/uLandTexture.pas
changeset 3513 f589230fa21b
parent 3509 d72c2219595d
child 3595 341e407e3754
equal deleted inserted replaced
3512:6a8b5f313190 3513:f589230fa21b
   135             begin
   135             begin
   136                 FreeTexture(tex);
   136                 FreeTexture(tex);
   137                 tex:= nil;
   137                 tex:= nil;
   138             end;
   138             end;
   139 
   139 
   140 if LandBackSurface <> nil then
   140     if LandBackSurface <> nil then
   141     SDL_FreeSurface(LandBackSurface);
   141         SDL_FreeSurface(LandBackSurface);
       
   142     LandBackSurface:= nil;
   142 end;
   143 end;
   143 
   144 
   144 end.
   145 end.