forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

dub fetch to libman, use http for now, close #223 for now

This commit is contained in:
Basile Burg 2018-01-26 12:18:51 +01:00
parent 2d91c8f5b7
commit c479f38603
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/ce_libmaneditor.pas
View File

@ -225,7 +225,7 @@ begin
ics := GetIconScaledSize; ics := GetIconScaledSize;
width := ScaleX(400,96); width := ScaleX(400,96);
height := ScaleY(34,96); height := ScaleY(40,96);
BorderStyle:= bsToolWindow; BorderStyle:= bsToolWindow;
caption := 'Select or type the DUB package name'; caption := 'Select or type the DUB package name';
Position:= poMainFormCenter; Position:= poMainFormCenter;
@ -329,7 +329,8 @@ begin
cli := TFPHTTPClient.Create(nil); cli := TFPHTTPClient.Create(nil);
try try
try try
pge := cli.Get('https://code.dlang.org/api/packages/search'); //TODO: use HTTPS when FCL-WEB will allow it again.
pge := cli.Get('http://code.dlang.org/api/packages/search');
except except
pge := '[]'; pge := '[]';
end; end;
@ -390,7 +391,8 @@ begin
with TFPHTTPClient.Create(nil) do with TFPHTTPClient.Create(nil) do
try try
try try
result := Get('https://code.dlang.org/api/packages/' + packageName + '/latest'); //TODO: use HTTPS when FCL-WEB will allow it again.
result := Get('http://code.dlang.org/api/packages/' + packageName + '/latest');
except except
result := 'master'; result := 'master';
end; end;