--- a/hedgewars/ArgParsers.inc	Sun Jun 12 14:45:26 2011 -0400
+++ b/hedgewars/ArgParsers.inc	Sun Jun 12 21:06:48 2011 -0400
@@ -34,6 +34,7 @@
 procedure internalStartGameWithParameters();
 var tmp: LongInt;
 begin
+    UserPathPrefix:= ParamStr(1)+'/Data';
     val(ParamStr(2), cScreenWidth);
     val(ParamStr(3), cScreenHeight);
     val(ParamStr(4), cBits);
@@ -146,9 +147,10 @@
 var paramIndex: LongInt;
     wrongParameter: boolean;
 begin
-    PathPrefix:= ParamStr(1);
-    recordFileName:= ParamStr(2);
-    paramIndex:= 3;
+    UserPathPrefix:= ParamStr(1)+'/Data';
+    PathPrefix:= ParamStr(2);
+    recordFileName:= ParamStr(3);
+    paramIndex:= 4;
     wrongParameter:= false;
     while (paramIndex <= ParamCount) and not wrongParameter do
         begin