paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-16 00:09:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Handle https-protocol on downloads from repositories

Browse Source 
git-svn-id: trunk@36529 -
This commit is contained in:
joost 2017-06-18 21:23:40 +00:00
parent 85050f3383
commit 187724d844
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/fppkg/src/pkgdownload.pp
View File

@ -148,7 +148,7 @@ begin
P:=URI.Protocol; P:=URI.Protocol;
If CompareText(P,'ftp')=0 then If CompareText(P,'ftp')=0 then
FTPDownload(URL,Dest) FTPDownload(URL,Dest)
else if CompareText(P,'http')=0 then else if (CompareText(P,'http')=0) or (CompareText(P,'https')=0) then
HTTPDownload(URL,Dest) HTTPDownload(URL,Dest)
else if CompareText(P,'file')=0 then else if CompareText(P,'file')=0 then
FileDownload(URL,Dest) FileDownload(URL,Dest)