Pass nil as HTTPManager (cloud class will create own HTTP connection …

…in this case)
pozitronik · May 22, 2019 · 8c97637 · 8c97637
1 parent 9ea6f79
commit 8c97637
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/RemoteProperty.pas b/RemoteProperty.pas
@@ -342,7 +342,7 @@ procedure TPropertyForm.TempPublicCloudInit(publicUrl: WideString);
 begin
 	TempCloudSettings.AccountSettings.public_account := true;
 	TempCloudSettings.AccountSettings.public_url := publicUrl;
-	self.TempPublicCloud := TCloudMailRu.Create(TempCloudSettings);
+	self.TempPublicCloud := TCloudMailRu.Create(TempCloudSettings, nil);
 	self.TempPublicCloud.login;
 end;