From dab6c48b472f83e14173ee55bd3393bbd44222da Mon Sep 17 00:00:00 2001
From: Ondrej Pokorny <lazarus@kluug.net>
Date: Wed, 2 Nov 2022 10:01:06 +0100
Subject: [PATCH] clean up

---
 packages/fcl-web/src/base/fphttpclientasyncpool.pas | 6 ------
 1 file changed, 6 deletions(-)

diff --git a/packages/fcl-web/src/base/fphttpclientasyncpool.pas b/packages/fcl-web/src/base/fphttpclientasyncpool.pas
index c7a9a66510..f777ad8468 100644
--- a/packages/fcl-web/src/base/fphttpclientasyncpool.pas
+++ b/packages/fcl-web/src/base/fphttpclientasyncpool.pas
@@ -136,7 +136,6 @@ type
     function GetHost: string;
     function GetURLDataString: string;
     procedure SetURLDataString(const aURLDataString: string);
-    function GetSelf: TFPHTTPClientAsyncPoolRequest;
   public
     constructor Create;
   public
@@ -439,11 +438,6 @@ begin
   Result := xURI.Host;
 end;
 
-function TFPHTTPClientAsyncPoolRequest.GetSelf: TFPHTTPClientAsyncPoolRequest;
-begin
-  Result := Self;
-end;
-
 function TFPHTTPClientAsyncPoolRequest.GetURLDataString: string;
 begin
   Result := TEncoding.SystemEncoding.GetAnsiString(URLData);