hedgewars/ArgParsers.inc
changeset 8370 0c79946e96f8
parent 8359 9a7024b2a4d3
child 8425 4f226963faef
--- a/hedgewars/ArgParsers.inc	Thu Jan 10 22:54:55 2013 +0400
+++ b/hedgewars/ArgParsers.inc	Thu Jan 10 22:59:46 2013 +0400
@@ -124,6 +124,8 @@
 
 procedure startVideoRecording(var paramIndex: LongInt);
 begin
+    // Silence the hint that appears when USE_VIDEO_RECORDING is not defined
+    paramIndex:= paramIndex;
 {$IFDEF USE_VIDEO_RECORDING}
     GameType:= gmtRecord;
     inc(paramIndex);
@@ -245,6 +247,7 @@
     tmpInt:= 1;
     while (index < size) do
         begin
+        newSyntax:= '';
         inc(paramIndex);
         cmd:= cmdArray[index];
         arg:= ParamStr(paramIndex);