diff options
| author | Alexander Krotov <ilabdsf@gmail.com> | 2019-06-09 14:08:37 +0300 |
|---|---|---|
| committer | Alexander Krotov <ilabdsf@gmail.com> | 2019-06-09 14:08:37 +0300 |
| commit | 814c3af4dff4c99dd29b24037be42a92aca61257 (patch) | |
| tree | 2640a483ce18e5a6229ec3bfeee45b9010040923 /test/Tests | |
| parent | 3026266cedfc9c55fadfe5420037d55cdc387247 (diff) | |
| download | pandoc-814c3af4dff4c99dd29b24037be42a92aca61257.tar.gz | |
Muse reader: test that links inside image descriptions work
Diffstat (limited to 'test/Tests')
| -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" |