X-Git-Url: http://deadsoftware.ru/gitweb?p=d2df-sdl.git;a=blobdiff_plain;f=src%2Fgame%2Fstub%2Fg_system.pas;h=4e4f42377e3da2e59abb09b1967ce97add6ad01f;hp=c3b4b23e0ee43fbacdec4756a62f4bdd782c4dcd;hb=d0936017ccb8a078d1b03f55478af284bb015bbc;hpb=1f8100acd63d597420f56d3796e81f5268f49de5

diff --git a/src/game/stub/g_system.pas b/src/game/stub/g_system.pas
index c3b4b23..4e4f423 100644
--- a/src/game/stub/g_system.pas
+++ b/src/game/stub/g_system.pas
@@ -37,6 +37,9 @@ interface
   procedure sys_Init;
   procedure sys_Final;
 
+  var (* hooks *)
+    sys_CharPress: procedure (ch: AnsiChar) = nil;
+
 implementation
 
   uses SysUtils;