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

* When RemoteRepository is "auto" download a list of mirrors, not the other way around

Browse Source 
git-svn-id: trunk@12487 -
This commit is contained in:
joost 2009-01-03 15:26:56 +00:00
parent 7da5ba5b4d
commit c5d776651e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
utils/fppkg/pkgcommands.pp
View File

@ -128,7 +128,7 @@ begin
// Download and load mirrors.xml // Download and load mirrors.xml
// This can be skipped when a custom RemoteRepository is configured // This can be skipped when a custom RemoteRepository is configured
if (GlobalOptions.RemoteMirrorsURL<>'') and if (GlobalOptions.RemoteMirrorsURL<>'') and
(GlobalOptions.RemoteRepository<>'auto') then (GlobalOptions.RemoteRepository='auto') then
begin begin
Log(vlCommands,SLogDownloading,[GlobalOptions.RemoteMirrorsURL,GlobalOptions.LocalMirrorsFile]); Log(vlCommands,SLogDownloading,[GlobalOptions.RemoteMirrorsURL,GlobalOptions.LocalMirrorsFile]);
DownloadFile(GlobalOptions.RemoteMirrorsURL,GlobalOptions.LocalMirrorsFile); DownloadFile(GlobalOptions.RemoteMirrorsURL,GlobalOptions.LocalMirrorsFile);