From 52803e2960c3520f8b2159f9076cb454c03988f8 Mon Sep 17 00:00:00 2001
From: Alexander Krotov <ilabdsf@gmail.com>
Date: Mon, 9 Apr 2018 03:16:55 +0300
Subject: Muse writer: don't break headers, line blocks and tables with line
 breaks

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

(limited to 'test')

diff --git a/test/Tests/Writers/Muse.hs b/test/Tests/Writers/Muse.hs
index 0526b2854..5d84150e1 100644
--- a/test/Tests/Writers/Muse.hs
+++ b/test/Tests/Writers/Muse.hs
@@ -360,6 +360,8 @@ tests = [ testGroup "block elements"
                    "remove soft break" $ text "a" <> softbreak <> text "b"
                    =?> "a b"
             , "line break" =: text "a" <> linebreak <> text "b" =?> "a<br>\nb"
+            , "no newline after line break in header" =: header 1 (text "a" <> linebreak <> text "b") =?> "* a<br>b"
+            , "no softbreak in header" =: header 1 (text "a" <> softbreak <> text "b") =?> "* a b"
             ]
           , testGroup "math"
             [ "inline math" =: math "2^3" =?> "2<sup>3</sup>"
-- 
cgit v1.2.3