hedgewars/hwengine.dpr
changeset 2154 3d2917be12c3
parent 2152 a2811690da1b
child 2161 0c8634241fa4
--- a/hedgewars/hwengine.dpr	Thu Jun 11 15:57:51 2009 +0000
+++ b/hedgewars/hwengine.dpr	Fri Jun 12 00:39:36 2009 +0000
@@ -305,6 +305,8 @@
 			if p <> ptMapCurrent then Pathz[p]:= PathPrefix + '/' + Pathz[p]
 	end;
  15: begin
+		PathPrefix:= ParamStr(1);
+		recordFileName:= ParamStr(2);
 		if ParamStr(3) = '--set-everything' then
 		begin
 			val(ParamStr(4), cScreenWidth);
@@ -368,7 +370,9 @@
 if recordFileName = '' then
 	SendIPCAndWaitReply('C')        // ask for game config
 else
+ begin
 	LoadRecordFromFile(recordFileName);
+ end;
 
 s:= 'eproto ' + inttostr(cNetProtoVersion);
 SendIPCRaw(@s[0], Length(s) + 1); // send proto version