浏览代码

* disable wrong package not available check

git-svn-id: trunk@10247 -
peter 17 年之前
父节点
当前提交
70a6eeaa16
共有 2 个文件被更改,包括 324 次插入289 次删除
  1. 322 287
      utils/fppkg/fpmkunitsrc.inc
  2. 2 2
      utils/fppkg/pkgcommands.pp

文件差异内容过多而无法显示
+ 322 - 287
utils/fppkg/fpmkunitsrc.inc


+ 2 - 2
utils/fppkg/pkgcommands.pp

@@ -293,8 +293,8 @@ begin
   for i:=0 to L.Count-1 do
     begin
       DepPackage:=CurrentRepository.PackageByName(L[i]);
-      if DepPackage.Version.CompareVersion(D.MinVersion)<0 then
-        Error(SErrNoPackageAvailable,[D.PackageName,D.MinVersion.AsString]);
+//      if DepPackage.Version.CompareVersion(D.MinVersion)<0 then
+//        Error(SErrNoPackageAvailable,[D.PackageName,D.MinVersion.AsString]);
       ExecuteAction(DepPackage,'install');
     end;
   FreeAndNil(L);

部分文件因为文件数量过多而无法显示