meissa/dda-masto-embed
6
0
Fork 0
Code Issues Pull requests Projects Releases 3 Packages Wiki Activity

Test correct function

Browse source
This commit is contained in:
erik 2024-05-17 18:10:13 +02:00
parent 4537956c41
commit 1143ba78a4
1 changed files with 159 additions and 158 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
src/test/dda/masto_embed/account_mode_test.cljs
View file

@ -43,7 +43,7 @@
:remote_url nil, :remote_url nil,
:text_url nil}]) :text_url nil}])
(def link_prev {:card (def link_prev
{:description "forgejo - Beyond coding. We forge.", {:description "forgejo - Beyond coding. We forge.",
:author_url "", :author_url "",
:image_description "", :image_description "",
@ -63,9 +63,10 @@
"https://cdn.masto.host/socialmeissagmbhde/cache/preview_cards/images/000/545/643/original/199336f5aa5b9683.png", "https://cdn.masto.host/socialmeissagmbhde/cache/preview_cards/images/000/545/643/original/199336f5aa5b9683.png",
:provider_url "", :provider_url "",
:height 290, :height 290,
:html ""}}) :html ""})
(def statuses [{:mentions [] (def statuses
[{:mentions []
:emojis [] :emojis []
:tags [] :tags []
:reblog :reblog
@ -210,11 +211,11 @@
(deftest test-masto-media->html (deftest test-masto-media->html
(is (= hic/post-with-img (is (= hic/post-with-img
(sut/masto-media->html hic/post-base media_attachments)))) (sut/masto-media->html hic/post-base-img media_attachments))))
;(deftest test-masto-link-prev->html (deftest test-insert-link-prev
; (is (= hic/post-with-prev (is (= hic/post-with-prev
; (sut/masto-link-prev->html hic/post-base link_prev)))) (sut/insert-link-prev hic/post-base-prev))))
(deftest empty-card-should-produce-empty-result (deftest empty-card-should-produce-empty-result
(is (= nil (is (= nil