summaryrefslogtreecommitdiff
path: root/test/Tests/Writers/Muse.hs
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2017-11-21 17:41:29 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2017-11-22 01:22:43 +0300
commitdf3a80cc97e99a8f4fdb8bf80b5ca85a216111b2 (patch)
tree074cce164dd180d834df1d7b3b61a3b04683ce6a /test/Tests/Writers/Muse.hs
parentcf87ffe9ee87b5e908725616998724fca0d6a8fd (diff)
Muse writer: escape only </code> inside code tag
Additional <verbatim> is not needed as <code> is verbatim already.
Diffstat (limited to 'test/Tests/Writers/Muse.hs')
-rw-r--r--test/Tests/Writers/Muse.hs3
1 files changed, 1 insertions, 2 deletions
diff --git a/test/Tests/Writers/Muse.hs b/test/Tests/Writers/Muse.hs
index a6c1edc3b..7e95ae85e 100644
--- a/test/Tests/Writers/Muse.hs
+++ b/test/Tests/Writers/Muse.hs
@@ -296,8 +296,7 @@ tests = [ testGroup "block elements"
-- Cite is trivial
, testGroup "code"
[ "simple" =: code "foo" =?> "<code>foo</code>"
- , "escape lightweight markup" =: code "foo = bar" =?> "<code><verbatim>foo = bar</verbatim></code>"
- , "escape tag" =: code "<code>foo = bar</code> baz" =?> "<code><verbatim><code>foo = bar</code> baz</verbatim></code>"
+ , "escape tag" =: code "<code>foo = bar</code> baz" =?> "<code><code>foo = bar<</code><code>/code> baz</code>"
]
, testGroup "spaces"
[ "space" =: text "a" <> space <> text "b" =?> "a b"