hedgewars/uIO.pas
changeset 53 0e27949850e3
parent 49 3afe33c1cf06
child 70 82d93eeecebe
--- a/hedgewars/uIO.pas	Sun Jan 15 23:56:47 2006 +0000
+++ b/hedgewars/uIO.pas	Thu Jan 19 21:12:20 2006 +0000
@@ -216,8 +216,8 @@
     ar: array[0..Pred(cMAXFORTPOINTS)] of TPoint;
     p: TPoint;
 begin
-if isRight then Fort:= Pathz[ptForts] + Fort + 'R.txt'
-           else Fort:= Pathz[ptForts] + Fort + 'L.txt';
+if isRight then Fort:= Pathz[ptForts] + '/' + Fort + 'R.txt'
+           else Fort:= Pathz[ptForts] + '/' + Fort + 'L.txt';
 WriteToConsole(msgLoading + Fort + ' ');
 {$I-}
 AssignFile(f, Fort);