mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-21 12:49:33 +02:00
fixed compilation for amiga-likes after r40769
git-svn-id: trunk@40770 -
This commit is contained in:
parent
b0c264948e
commit
e3126bdf3d
@ -57,7 +57,7 @@ begin
|
||||
AddUnit('resolve');
|
||||
end;
|
||||
T.ResourceStrings := True;
|
||||
T:=P.Targets.AddUnit('sslsockets.pp',AllUnixOSes+AllWindowsOSes);
|
||||
T:=P.Targets.AddUnit('sslsockets.pp',AllUnixOSes+AllWindowsOSes+AllAmigaLikeOSes);
|
||||
with T.Dependencies do
|
||||
begin
|
||||
AddUnit('ssockets');
|
||||
|
@ -365,9 +365,8 @@ Function EncodeURLElement(S : String) : String;
|
||||
Function DecodeURLElement(Const S : String) : String;
|
||||
|
||||
implementation
|
||||
{$if not defined(hasamiga)}
|
||||
|
||||
uses sslsockets;
|
||||
{$endif}
|
||||
|
||||
resourcestring
|
||||
SErrInvalidProtocol = 'Invalid protocol : "%s"';
|
||||
|
Loading…
Reference in New Issue
Block a user