hedgewars/ArgParsers.pas
changeset 10316 0f46fb0e0d5f
parent 10175 c92668840ea8
child 10404 1baaab44a0b2
child 11046 47a8c19ecb60
child 11099 c51e4c942525
--- a/hedgewars/ArgParsers.pas	Mon Jun 16 19:07:11 2014 +0200
+++ b/hedgewars/ArgParsers.pas	Mon Jun 16 23:46:22 2014 +0200
@@ -270,7 +270,7 @@
         {--no-hogtag}           32 : cTagsMask := cTagsMask and (not htName);
         {--no-healthtag}        33 : cTagsMask := cTagsMask and (not htHealth);
         {--translucent-tags}    34 : cTagsMask := cTagsMask or htTransparent;
-        {--lua-test}            35 : begin cTestLua := true; cScriptName := getstringParameter(arg, paramIndex, parseParameter); WriteLn(stdout, 'Lua test file specified: ' + cScriptName);end;
+        {--lua-test}            35 : begin cTestLua := true; SetSound(false); cScriptName := getstringParameter(arg, paramIndex, parseParameter); WriteLn(stdout, 'Lua test file specified: ' + cScriptName);end;
     else
         begin
         //Assume the first "non parameter" is the replay file, anything else is invalid