mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-03 07:51:58 +02:00
* Do not decode the URL before passing it on
git-svn-id: trunk@21871 -
This commit is contained in:
parent
8dc7313374
commit
ffc3164594
@ -738,7 +738,7 @@ Var
|
||||
|
||||
begin
|
||||
FResponseHeaders.Clear;
|
||||
URI:=ParseURI(AURL);
|
||||
URI:=ParseURI(AURL,False);
|
||||
If (Lowercase(URI.Protocol)<>'http') then
|
||||
Raise EHTTPClient.CreateFmt(SErrInvalidProtocol,[URI.Protocol]);
|
||||
ConnectToServer(URI.Host,URI.Port);
|
||||
|
||||
Loading…
Reference in New Issue
Block a user