Introduce group posts

Signed-off-by: Thomas Citharel <tcit@tcit.fr>

lib/service/geospatial/mimirsbrunn.ex

@@ -8,8 +8,8 @@ defmodule Mobilizon.Service.Geospatial.Mimirsbrunn do
   """
 
   alias Mobilizon.Addresses.Address
-  alias Mobilizon.Config
   alias Mobilizon.Service.Geospatial.Provider
+  alias Mobilizon.Service.HTTP.BaseClient
 
   require Logger
 
@@ -17,25 +17,17 @@ defmodule Mobilizon.Service.Geospatial.Mimirsbrunn do
 
   @endpoint Application.get_env(:mobilizon, __MODULE__) |> get_in([:endpoint])
 
-  @http_options [
-    follow_redirect: true,
-    ssl: [{:versions, [:"tlsv1.2"]}]
-  ]
-
   @impl Provider
   @doc """
   Mimirsbrunn implementation for `c:Mobilizon.Service.Geospatial.Provider.geocode/3`.
   """
   @spec geocode(number(), number(), keyword()) :: list(Address.t())
   def geocode(lon, lat, options \\ []) do
-    user_agent = Keyword.get(options, :user_agent, Config.instance_user_agent())
-    headers = [{"User-Agent", user_agent}]
     url = build_url(:geocode, %{lon: lon, lat: lat}, options)
     Logger.debug("Asking Mimirsbrunn for reverse geocoding with #{url}")
 
-    with {:ok, %HTTPoison.Response{status_code: 200, body: body}} <-
-           HTTPoison.get(url, headers, @http_options),
-         {:ok, %{"features" => features}} <- Poison.decode(body) do
+    with {:ok, %{status: 200, body: body}} <- BaseClient.get(url),
+         {:ok, %{"features" => features}} <- Jason.decode(body) do
       process_data(features)
     else
       _ -> []
@@ -48,14 +40,11 @@ defmodule Mobilizon.Service.Geospatial.Mimirsbrunn do
   """
   @spec search(String.t(), keyword()) :: list(Address.t())
   def search(q, options \\ []) do
-    user_agent = Keyword.get(options, :user_agent, Config.instance_user_agent())
-    headers = [{"User-Agent", user_agent}]
     url = build_url(:search, %{q: q}, options)
     Logger.debug("Asking Mimirsbrunn for addresses with #{url}")
 
-    with {:ok, %HTTPoison.Response{status_code: 200, body: body}} <-
-           HTTPoison.get(url, headers, @http_options),
-         {:ok, %{"features" => features}} <- Poison.decode(body) do
+    with {:ok, %{status: 200, body: body}} <- BaseClient.get(url),
+         {:ok, %{"features" => features}} <- Jason.decode(body) do
       process_data(features)
     else
       _ -> []