Parcourir la source

pkgutil.pas, add_package:
* package names are case insensitive so add them in uppercase to correctly detect duplicates

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

svenbarth il y a 10 ans
Parent
commit
3949600655
1 fichiers modifiés avec 1 ajouts et 1 suppressions
  1. 1 1
      compiler/pkgutil.pas

+ 1 - 1
compiler/pkgutil.pas

@@ -441,7 +441,7 @@ implementation
       new(entry);
       entry^.package:=nil;
       entry^.realpkgname:=name;
-      packagelist.add(name,entry);
+      packagelist.add(upper(name),entry);
     end;