From 15608dbc2c360fb1e2ba4e9bcf295697b54102f4 Mon Sep 17 00:00:00 2001 From: Pozitronik Date: Wed, 22 May 2019 14:06:40 +0300 Subject: [PATCH] doInit parameter not used, discard --- HTTPManager.pas | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/HTTPManager.pas b/HTTPManager.pas index 634d1f95..f026a948 100644 --- a/HTTPManager.pas +++ b/HTTPManager.pas @@ -18,7 +18,7 @@ THTTPManager = class {Параметры, с которыми будут отдаваться подключения: создаём с ними экземпляр класса, а дальше он сам рулит} constructor Create(Settings: TConnectionSettings; ExternalProgressProc: TProgressHandler = nil; ExternalLogProc: TLogHandler = nil); destructor Destroy; override; - function get(ThreadId: Cardinal; doInit: boolean = true): TCloudMailRuHTTP; + function get(ThreadId: Cardinal): TCloudMailRuHTTP; end; implementation @@ -44,9 +44,9 @@ destructor THTTPManager.Destroy; inherited; end; -function THTTPManager.get(ThreadId: Cardinal; doInit: boolean = true): TCloudMailRuHTTP; +function THTTPManager.get(ThreadId: Cardinal): TCloudMailRuHTTP; begin - if not Connections.TryGetValue(ThreadId, result) and doInit then + if not Connections.TryGetValue(ThreadId, result) then begin result := TCloudMailRuHTTP.Create(ConnectionSettings, ExternalProgressProc, ExternalLogProc); Connections.AddOrSetValue(ThreadId, result);