hedgewars/uInputHandler.pas
changeset 13504 c41b16ac2e05
parent 13495 4faebbf9c44f
child 13524 1232ab8206d4
--- a/hedgewars/uInputHandler.pas	Tue Jul 17 19:28:31 2018 +0200
+++ b/hedgewars/uInputHandler.pas	Tue Jul 17 19:44:29 2018 +0200
@@ -109,7 +109,7 @@
     else begin
         code:= 0;
         while (code <= High(CurrentBinds.indices)) and (CurrentBinds.indices[code] <> index) do inc(code);
-        checkFails(code <= High(CurrentBinds.indices), 'binds registry inconsistency', True);
+        checkFails(code <= High(CurrentBinds.indices), 'Inconsistency in key binding registry', True);
         KeyBindToCode:= code;
     end;
 end;
@@ -333,7 +333,7 @@
 procedure RegisterBind(var binds: TBinds; key, value: shortstring);
 var code: LongInt;
 begin
-    checkFails(binds.lastIndex < 255, 'too many binds', true);
+    checkFails(binds.lastIndex < 255, 'Too many key bindings', true);
 
     code:= KeyNameToCode(key);