@@ -27,15 +27,14 @@ infix 4 =:
2727spcSep :: [Inlines] -> Inlines
2828spcSep = mconcat . intersperse space
2929
30−-- Tables and definition lists don't round-trip yet
30+-- Tables don't round-trip yet
3131
3232makeRoundTrip :: Block -> Block
3333makeRoundTrip Table{} = Para [Str "table was here"]
34−makeRoundTrip DefinitionList{} = Para [Str "deflist was here"]
3534makeRoundTrip x = x
3635
3736-- Demand that any AST produced by Muse reader and written by Muse writer can be read back exactly the same way.
38−-- Currently we remove code blocks and tables and compare third rewrite to the second.
37+-- Currently we remove tables and compare third rewrite to the second.
3938-- First and second rewrites are not equal yet.
4039roundTrip :: Block -> Bool
4140roundTrip b = d'' == d'''