DEADSOFTWARE

cosmetix
authorKetmar Dark <ketmar@ketmar.no-ip.org>
Mon, 28 Aug 2017 10:40:40 +0000 (13:40 +0300)
committerKetmar Dark <ketmar@ketmar.no-ip.org>
Mon, 28 Aug 2017 11:21:27 +0000 (14:21 +0300)
src/game/g_holmes.pas

index 1222cd6c73da25c92ce45a6b16c643137e5bdea8..598e0ee48a3a07394d14476c2537f0bfcd9726a8 100644 (file)
@@ -904,10 +904,12 @@ end;
 function g_Holmes_KeyEvent (var ev: THKeyEvent): Boolean;
 var
   mon: TMonster;
-  pan: TPanel;
   x, y, w, h: Integer;
+  {$IF DEFINED(D2F_DEBUG)}
+  pan: TPanel;
   ex, ey: Integer;
   dx, dy: Integer;
+  {$ENDIF}
 
   procedure dummyWallTrc (cx, cy: Integer);
   begin