Преглед на файлове

* Packages can only be broken when they are installed

git-svn-id: trunk@35541 -
joost преди 8 години
родител
ревизия
910c05f942
променени са 1 файла, в които са добавени 6 реда и са изтрити 0 реда
  1. 6 0
      packages/fppkg/src/pkgfppkg.pp

+ 6 - 0
packages/fppkg/src/pkgfppkg.pp

@@ -333,6 +333,12 @@ var
 begin
   result:=false;
 
+  if Assigned(APackage.Repository) and (APackage.Repository.RepositoryType <> fprtInstalled) then
+    begin
+    Result := False;
+    Exit;
+    end;
+
   EnterFindBrokenPackages;
   try
     HashPtr := PtrInt(FBrokenPackagesDictionary.Find(APackage.Name));