Remove erroneous key

This commit is contained in:
erik 2024-05-17 18:30:59 +02:00
parent 90ec08522d
commit 644717d272

View file

@ -26,21 +26,17 @@
[clojure.walk :refer [postwalk]])) [clojure.walk :refer [postwalk]]))
(def link_preview (def link_preview
{:type :element, [{:type :element,
:attrs {:href "LINK_PREVIEW_URL", :class "mastodon-post-link-preview", :target "_blank"}, :attrs {:class "mastodon-post-link-image", :src "LINK_PREVIEW_IMG_URL"},
:tag :a, :tag :img,
:content :content nil}
[{:type :element, {:type :element,
:attrs {:class "mastodon-post-link-image", :src "LINK_PREVIEW_IMG_URL"}, :attrs {:class "mastodon-post-link-info"},
:tag :img, :tag :div,
:content nil} :content
{:type :element, [{:type :element, :attrs {:class "mastodon-post-link-title"}, :tag :h4, :content ["LINK_PREVIEW_TITLE"]}
:attrs {:class "mastodon-post-link-info"}, {:type :element, :attrs {:class "mastodon-post-link-description"}, :tag :div, :content ["LINK_PREVIEW_DESC"]}
:tag :div, {:type :element, :attrs {:class "mastodon-post-link-url"}, :tag :div, :content ["LINK_PREVIEW_URL"]}]}])
:content
[{:type :element, :attrs {:class "mastodon-post-link-title"}, :tag :h4, :content ["LINK_PREVIEW_TITLE"]}
{:type :element, :attrs {:class "mastodon-post-link-description"}, :tag :div, :content ["LINK_PREVIEW_DESC"]}
{:type :element, :attrs {:class "mastodon-post-link-url"}, :tag :div, :content ["LINK_PREVIEW_URL"]}]}]})
(defn mastocard->html [card] (defn mastocard->html [card]
(when (some? card) (when (some? card)