瀏覽代碼

* Add directory separator after $CfgDir

Michaël Van Canneyt 1 年之前
父節點
當前提交
4fdac2619b
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      fpmake.pp

+ 1 - 1
fpmake.pp

@@ -70,7 +70,7 @@ Var
     if Suffix<>'' then
     if Suffix<>'' then
       aSubDirs:=aSubDirs+'*'+PathDelim+Suffix;
       aSubDirs:=aSubDirs+'*'+PathDelim+Suffix;
     if not FilenameIsAbsolute(aDir) then
     if not FilenameIsAbsolute(aDir) then
-      aSubDirs:='$CfgDir'+aSubDirs;
+      aSubDirs:='$CfgDir'+PathDelim+aSubDirs;
     Addln(aPrefix+aSubDirs);
     Addln(aPrefix+aSubDirs);
   end;
   end;