Skip to content

Commit

Permalink
Remove assumption that file could reference http. Licensing should be…
Browse files Browse the repository at this point in the history
… contained in the repo.
  • Loading branch information
darnocian authored and Memnarch committed Dec 3, 2020
1 parent 16098c7 commit 8337e1b
Showing 1 changed file with 1 addition and 3 deletions.
4 changes: 1 addition & 3 deletions DN.JSonFile.Info.pas
Expand Up @@ -218,9 +218,7 @@ procedure TInfoFile.ReadLicenses(const ARoot: TJSONObject);
begin
LObject := TJSONObject(LValue);
LLicense.LicenseType := ReadString(LObject, 'type');
LLicense.LicenseFile := ReadString(LObject, 'file');
if not LLicense.LicenseFile.StartsWith('http') then
LLicense.LicenseFile := NormaliseDirectoryPath(LLicense.LicenseFile);
LLicense.LicenseFile := NormaliseDirectoryPath(ReadString(LObject, 'file'));
FLicenses[i] := LLicense;
end;
end;
Expand Down

0 comments on commit 8337e1b

Please sign in to comment.