hedgewars/uInputHandler.pas
changeset 7048 0a4c88935902
parent 7026 8d1724e1337e
child 7049 35d762458d66
--- a/hedgewars/uInputHandler.pas	Thu May 10 22:15:31 2012 +0200
+++ b/hedgewars/uInputHandler.pas	Thu May 10 23:21:56 2012 +0200
@@ -239,12 +239,8 @@
 
 for i:= 6 to cKeyMaxIndex do
     begin
-{$IFDEF SDL13}
-    s:= shortstring(SDL_GetScancodeName(i));
-{$ELSE}
     s:= shortstring(sdl_getkeyname(i));
-{$ENDIF}
-    WriteToConsole(IntToStr(i) + ': ' + s + ' ' + IntToStr(cKeyMaxIndex));
+    //WriteToConsole(IntToStr(i) + ': ' + s + ' ' + IntToStr(cKeyMaxIndex));
     if s = 'unknown key' then KeyNames[i]:= ''
     else 
         begin