fix default binding for F10 / slot 10 not working
authorsheepluva
Sat, 23 Apr 2016 10:48:18 +0200
changeset 11669 64465e0eb852
parent 11668 0427a9b6457b
child 11671 88f9fa769cef
fix default binding for F10 / slot 10 not working
hedgewars/uInputHandler.pas
--- a/hedgewars/uInputHandler.pas	Sat Apr 23 09:54:05 2016 +0200
+++ b/hedgewars/uInputHandler.pas	Sat Apr 23 10:48:18 2016 +0200
@@ -318,7 +318,7 @@
     DefaultBinds[KeyNameToCode('j0a0d')]:= '+right';
     DefaultBinds[KeyNameToCode('j0a1u')]:= '+up';
     DefaultBinds[KeyNameToCode('j0a1d')]:= '+down';
-    for i:= 1 to 10 do DefaultBinds[KeyNameToCode('f'+IntToStr(i))]:= 'slot '+IntToStr(i);
+    for i:= 1 to 10 do DefaultBinds[KeyNameToCode('f'+IntToStr(i))]:= 'slot '+char(48+i);
     for i:= 1 to 5  do DefaultBinds[KeyNameToCode(IntToStr(i))]:= 'timer '+IntToStr(i);
 
     loadBinds('dbind', cPathz[ptData] + '/settings.ini');