DEADSOFTWARE

cosmetix
[d2df-sdl.git] / 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