diff options
| -rw-r--r-- | test/Tests/Readers/Muse.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/test/Tests/Readers/Muse.hs b/test/Tests/Readers/Muse.hs index 51ccbc1da..426ba935d 100644 --- a/test/Tests/Readers/Muse.hs +++ b/test/Tests/Readers/Muse.hs @@ -292,6 +292,9 @@ tests = , "Image inside link" =: "[[https://amusewiki.org/][Image [[image.png][with it's own description]] inside link description]]" =?> para (link "https://amusewiki.org/" "" (text "Image " <> (image "image.png" "" (text "with it's own description")) <> text " inside link description")) + , "Link inside image description" =: + "[[image.jpg][Image from [[https://amusewiki.org/]]]]" =?> + para (image "image.jpg" "" (text "Image from " <> link "https://amusewiki.org/" "" (str "https://amusewiki.org/"))) ] , testGroup "Literal" |