Quellcode durchsuchen

* only parse checksum when available

git-svn-id: trunk@10562 -
peter vor 17 Jahren
Ursprung
Commit
ef2eaf15b2
1 geänderte Dateien mit 4 neuen und 1 gelöschten Zeilen
  1. 4 1
      utils/fppkg/pkgrepos.pp

+ 4 - 1
utils/fppkg/pkgrepos.pp

@@ -269,7 +269,10 @@ procedure FindInstalledPackages(ACompilerOptions:TCompilerOptions;showdups:boole
       V:=L.Values['version'];
       V:=L.Values['version'];
       APackage.InstalledVersion.AsString:=V;
       APackage.InstalledVersion.AsString:=V;
       V:=L.Values['checksum'];
       V:=L.Values['checksum'];
-      APackage.InstalledChecksum:=StrToInt(V);
+      if V<>'' then
+        APackage.InstalledChecksum:=StrToInt(V)
+      else
+        APackage.InstalledChecksum:=$ffffffff;
       // Load dependencies
       // Load dependencies
       V:=L.Values['depends'];
       V:=L.Values['depends'];
       DepSL:=TStringList.Create;
       DepSL:=TStringList.Create;