--- a/hedgewars/uKeys.pas Sun Oct 31 00:32:41 2010 -0400
+++ b/hedgewars/uKeys.pas Sun Oct 31 12:19:54 2010 -0400
@@ -264,15 +264,16 @@
for i:= 6 to cKeyMaxIndex do
begin
- s:= shortstring(sdl_getkeyname(i));
+ s:= shortstring(sdl_getkeyname(i));
//writeln(stdout,inttostr(i) + ': ' + s);
- if s = 'unknown key' then KeyNames[i]:= ''
- else begin
+ if s = 'unknown key' then KeyNames[i]:= ''
+ else
+ begin
for t:= 1 to Length(s) do
if s[t] = ' ' then s[t]:= '_';
- KeyNames[i]:= s
+ KeyNames[i]:= s
end;
-end;
+ end;
//for i:= 0 to cKeyMaxIndex do writeln(stdout,inttostr(i) + ': ' + KeyNames[i]);