hedgewars/ArgParsers.inc
changeset 6426 2d44f6561e72
parent 5441 39962b855540
child 6580 6155187bf599
--- a/hedgewars/ArgParsers.inc	Fri Nov 25 18:36:12 2011 +0300
+++ b/hedgewars/ArgParsers.inc	Fri Nov 25 23:22:35 2011 +0300
@@ -159,7 +159,7 @@
     recordFileName:= ParamStr(3);
     paramIndex:= 4;
     wrongParameter:= false;
-    while (paramIndex <= ParamCount) and not wrongParameter do
+    while (paramIndex <= ParamCount) and (not wrongParameter) do
         begin
         if ParamStr(paramIndex) = '--set-video'  then
 //--set-video [screen width] [screen height] [color dept]