瀏覽代碼

* only parse checksum when available

git-svn-id: trunk@10562 -
peter 17 年之前
父節點
當前提交
ef2eaf15b2
共有 1 個文件被更改,包括 4 次插入1 次删除
  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'];
       APackage.InstalledVersion.AsString:=V;
       V:=L.Values['checksum'];
-      APackage.InstalledChecksum:=StrToInt(V);
+      if V<>'' then
+        APackage.InstalledChecksum:=StrToInt(V)
+      else
+        APackage.InstalledChecksum:=$ffffffff;
       // Load dependencies
       V:=L.Values['depends'];
       DepSL:=TStringList.Create;