Browse Source

pkgutil.pas, add_package_libs:
* fix exit condition (on Linux it probably worked by accident :/ )

git-svn-id: branches/svenbarth/packages@32579 -

svenbarth 9 years ago
parent
commit
b01f802c80
1 changed files with 3 additions and 1 deletions
  1. 3 1
      compiler/pkgutil.pas

+ 3 - 1
compiler/pkgutil.pas

@@ -504,7 +504,8 @@ implementation
       i : longint;
       pkgname : tpathstr;
     begin
-      if not (target_info.system in systems_indirect_var_imports) then
+      if target_info.system in systems_indirect_var_imports then
+        { we're using import libraries anyway }
         exit;
       for i:=0 to packagelist.count-1 do
         begin
@@ -817,6 +818,7 @@ implementation
       alreadyloaded.free;
       for i:=0 to cache.count-1 do
         dispose(pcacheentry(cache[i]));
+      cache.free;
     end;
 
 end.