hedgewars/uKeys.pas
branch0.9.15
changeset 4751 849740a91d36
parent 4746 3ae448aebe7e
child 4845 9a0f5377c529
--- a/hedgewars/uKeys.pas	Sat Jan 15 21:00:45 2011 +0100
+++ b/hedgewars/uKeys.pas	Sat Jan 15 21:32:44 2011 +0100
@@ -136,7 +136,7 @@
     if ((tkbdn[KeyNameToCode('left_ctrl')] = 1) or (tkbdn[KeyNameToCode('right_ctrl')] = 1)) then
 {$ENDIF}
     begin
-        if tkbdn[KeyNameToCode('q')] = 1 then ParseCommand ('shutdown', true)
+        if tkbdn[KeyNameToCode('q')] = 1 then ParseCommand ('halt', true)
         else if tkbdn[KeyNameToCode('w')] = 1 then ParseCommand ('forcequit', true);
     end;