Преглед изворни кода

* Since r29004 there is no need anymore to add the package-path-prefix

git-svn-id: trunk@29011 -
joost пре 11 година
родитељ
комит
c1eab07eba
1 измењених фајлова са 2 додато и 2 уклоњено
  1. 2 2
      packages/gdbint/fpmake.pp

+ 2 - 2
packages/gdbint/fpmake.pp

@@ -108,9 +108,9 @@ begin
       L := TStringList.Create;
       L := TStringList.Create;
       try
       try
         if P.Directory<>'' then
         if P.Directory<>'' then
-          L.values[Installer.BuildEngine.AddPathPrefix(P,'src')+DirectorySeparator+'gdbver_nogdb.inc'] := IncludeTrailingPathDelimiter(P.Directory) +'src'+DirectorySeparator+'gdbver.inc'
+          L.values['src'+DirectorySeparator+'gdbver_nogdb.inc'] := IncludeTrailingPathDelimiter(P.Directory) +'src'+DirectorySeparator+'gdbver.inc'
         else
         else
-          L.values[Installer.BuildEngine.AddPathPrefix(P,'src')+DirectorySeparator+'gdbver_nogdb.inc'] := 'src'+DirectorySeparator+'gdbver.inc';
+          L.values['src'+DirectorySeparator+'gdbver_nogdb.inc'] := 'src'+DirectorySeparator+'gdbver.inc';
         Installer.BuildEngine.cmdcopyfiles(L, Installer.BuildEngine.StartDir, nil);
         Installer.BuildEngine.cmdcopyfiles(L, Installer.BuildEngine.StartDir, nil);
       finally
       finally
         L.Free;
         L.Free;