From d777fe8bbecc3320cf95754dbe7f9eee21876770 Mon Sep 17 00:00:00 2001
From: Alexander Krotov <ilabdsf@gmail.com>
Date: Sat, 3 Feb 2018 18:36:38 +0300
Subject: Muse writer: write image width specified in percent in Text::Amuse
 mode

---
 test/Tests/Writers/Muse.hs | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'test/Tests/Writers/Muse.hs')

diff --git a/test/Tests/Writers/Muse.hs b/test/Tests/Writers/Muse.hs
index f330d14c5..a7d6b76ba 100644
--- a/test/Tests/Writers/Muse.hs
+++ b/test/Tests/Writers/Muse.hs
@@ -351,6 +351,9 @@ tests = [ testGroup "block elements"
                                                   =?> "[[URL:1.png]]"
             ]
           , "image" =: image "image.png" "Image 1" (str "") =?> "[[image.png][Image 1]]"
+          , "image with width" =:
+            imageWith ("", [], [("width", "60%")]) "image.png" "Image" (str "") =?>
+            "[[image.png 60][Image]]"
           , "note" =: note (plain (text "Foo"))
                    =?> unlines [ "[1]"
                                , ""
-- 
cgit v1.2.3