X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fengine%2Fe_input_stub.inc;h=4f10301a04bc3ac35a30234833121b4fd2f1fe71;hb=refs%2Fheads%2Frenders_updated;hp=3c208efa14a2f5d39d104a9b39d878a660e29170;hpb=c7142be1c73501f5ca7fff57c6b1af1891ed83d0;p=d2df-sdl.git

diff --git a/src/engine/e_input_stub.inc b/src/engine/e_input_stub.inc
index 3c208ef..4f10301 100644
--- a/src/engine/e_input_stub.inc
+++ b/src/engine/e_input_stub.inc
@@ -138,8 +138,6 @@ interface
     IK_Y       = 106;
     IK_Z       = 107;
     IK_MINUS   = 108;
-    IK_RMETA   = 109;
-    IK_LMETA   = 110;
     IK_NONUSBACKSLASH = 111;
     // TODO: think of something better than this shit
     IK_LASTKEY = e_MaxKbdKeys-1;
@@ -228,8 +226,9 @@ interface
   JOY2_DOWN = JOYH_BEG + 2*e_MaxJoyHats*4 + 0*4 + HAT_DOWN;
   JOY3_DOWN = JOYH_BEG + 3*e_MaxJoyHats*4 + 0*4 + HAT_DOWN;
 
-function  e_InitInput: Boolean;
-procedure e_ReleaseInput;
+procedure e_Input_Initialize;
+procedure e_Input_Finalize;
+
 procedure e_UnpressAllKeys;
 procedure e_KeyUpDown (key: Integer; down: Boolean);
 
@@ -353,8 +352,6 @@ begin
   e_KeyNames[IK_DOT] := '.';
   e_KeyNames[IK_MINUS] := '-';
   e_KeyNames[IK_EQUALS] := '=';
-  e_KeyNames[IK_RMETA] := 'RMETA';
-  e_KeyNames[IK_LMETA] := 'LMETA';
   e_KeyNames[IK_NONUSBACKSLASH] := 'NONUSBACKSLASH';
 
   // joysticks
@@ -395,16 +392,15 @@ begin
   result := i < e_MaxJoys
 end;
 
-function e_InitInput: Boolean;
+procedure e_Input_Initialize;
   var i: Integer;
 begin
   for i := 0 to e_MaxJoys - 1 do
     e_JoystickAvailable[i] := False;
-  GenerateKeyNames;
-  result := True
+  GenerateKeyNames
 end;
 
-procedure e_ReleaseInput;
+procedure e_Input_Finalize;
   var i: Integer;
 begin
   for i := 0 to e_MaxJoys - 1 do