Muse reader: test image with space in filename

2018-05-27 22:22:04 +03:00 · 2018-05-27 22:22:04 +03:00 · 6907985e82
commit 6907985e82
parent d7164e5c66
1 changed files with 3 additions and 0 deletions
--- a/test/Tests/Readers/Muse.hs
+++ b/test/Tests/Readers/Muse.hs
@ -197,6 +197,9 @@ tests =
        , "Image with description" =:
          "[[image.jpg][Image]]" =?>
          para (image "image.jpg" "" (text "Image"))
+        , "Image with space in filename" =:
+          "[[image name.jpg]]" =?>
+          para (image "image name.jpg" "" mempty)
        , "Image link" =:
          "[[URL:image.jpg]]" =?>
          para (link "image.jpg" "" (str "image.jpg"))