hedgewars/uKeys.pas
changeset 4131 e89d11f6361c
parent 4046 cfdbddc4b385
child 4359 83ef50815535
--- a/hedgewars/uKeys.pas	Fri Nov 05 14:14:32 2010 -0400
+++ b/hedgewars/uKeys.pas	Fri Nov 05 14:49:44 2010 -0400
@@ -350,6 +350,8 @@
 DefaultBinds[KeyNameToCode('left_shift')]:= '+precise';
 {$ENDIF}
 
+for i:= 1 to 10 do DefaultBinds[KeyNameToCode('f'+inttostr(i))]:= 'slot '+inttostr(i);
+
 SetDefaultBinds();
 end;