gl: draw stats on player view

[d2df-sdl.git] / src / game / g_corpses.pas

diff --git a/src/game/g_corpses.pas b/src/game/g_corpses.pas
index 3f08d7966f3dc71a9a19b2a4577f37573b12fb20..b606a5ba9850a13046fa5cff7100045395261eb8 100644 (file)
--- a/src/game/g_corpses.pas
+++ b/src/game/g_corpses.pas
@@ -85,7 +85,7 @@ implementation
     {$ENDIF}
     Math,
     utils, g_saveload, xstreams,
-    g_game, g_textures, g_map
+    g_game, g_animations, g_map
   ;
 
   var
@@ -247,7 +247,7 @@ implementation
   end;
 
   procedure TCorpse.LoadState (st: TStream);
-    var anim, blending: Boolean; r, g, b, alpha: Byte; stub: TAnimationState;
+    var anim, blending: Boolean; r, g, b, alpha: Byte; stub: TAnimState;
   begin
     assert(st <> nil);
 
@@ -267,7 +267,7 @@ implementation
     Obj_LoadState(@FObj, st);
     FPlayerUID := utils.readWord(st);
     // animation
-    stub := TAnimationState.Create(False, 0, 0);
+    stub := TAnimState.Create(False, 0, 0);
     anim := utils.readBool(st);
     if anim then
     begin
@@ -282,7 +282,6 @@ implementation
     // animation for mask (same as animation, compat with older saves)
     anim := utils.readBool(st);
     if anim then stub.LoadState(st, alpha, blending);
-    stub.Free;
   end;
 
   procedure g_Corpses_SetMax (Count: Word);