Introduce group posts

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

lib/service/rich_media/parsers/oembed_parser.ex

@@ -42,7 +42,7 @@ defmodule Mobilizon.Service.RichMedia.Parsers.OEmbed do
   end
 
   defp get_oembed_data(url) do
-    with {:ok, %HTTPoison.Response{body: json}} <- HTTPoison.get(url, [], @http_options),
+    with {:ok, %{body: json}} <- Tesla.get(url, opts: @http_options),
          {:ok, data} <- Jason.decode(json),
          data <- data |> Map.new(fn {k, v} -> {String.to_atom(k), v} end) do
       {:ok, data}

lib/service/rich_media/parsers/ogp.ex

@@ -34,7 +34,7 @@ defmodule Mobilizon.Service.RichMedia.Parsers.OGP do
     |> Map.put(:height, get_integer_value(data, :"image:height"))
   end
 
-  @spec get_integer_value(Map.t(), atom()) :: integer() | nil
+  @spec get_integer_value(map(), atom()) :: integer() | nil
   defp get_integer_value(data, key) do
     with value when not is_nil(value) <- Map.get(data, key),
          {value, ""} <- Integer.parse(value) do