Adjust image with link in MD campaigns to work with Lexbor

Author: wmnnd

lib/keila/templates/html.ex

@@ -197,19 +197,14 @@ defmodule Keila.Templates.Html do
   defp do_apply_email_markup(
          {"a", a_attrs, [{"table", _, [{"tr", _, [{"td", _, [{"img", img_attrs, _}]}]}]}]}
        ) do
-    {"table", [{"style", "width: 100%"}],
-     [
-       {"tr", [{"class", "block--image"}],
-        [
-          {"td", [],
-           [
-             {"a", a_attrs,
-              [
-                {"img", img_attrs, []}
-              ]}
-           ]}
-        ]}
-     ]}
+    build_img_with_link(a_attrs, img_attrs)
+  end
+
+  defp do_apply_email_markup(
+         {"a", a_attrs,
+          [_, {"table", _, [{"tr", _, [{"td", _, [{"img", img_attrs, _}]}]}]}, "\n"]}
+       ) do
+    build_img_with_link(a_attrs, img_attrs)
   end
 
   defp do_apply_email_markup({"img", img_attrs, _}) do
@@ -256,4 +251,20 @@ defmodule Keila.Templates.Html do
         ]}
      ]}
   end
+
+  defp build_img_with_link(a_attrs, img_attrs) do
+    {"table", [{"style", "width: 100%"}],
+     [
+       {"tr", [{"class", "block--image"}],
+        [
+          {"td", [],
+           [
+             {"a", a_attrs,
+              [
+                {"img", img_attrs, []}
+              ]}
+           ]}
+        ]}
+     ]}
+  end
 end