@@ -67,7 +67,7 @@ listTerm = markdown <|> braces (range <|> ExplicitList <$> commaSep expr)
68 whitespace
68 whitespace
69 string "}}"
69 string "}}"
70− let span = "<span id=\"md" ++ show (length exprs) ++ "\"></span>"
70+ let span = "<span id=\"md" ++ show (length exprs) ++ "\" style=\"font-family:monospace;\">{{ ... }}</span>"
71 closeMarkdown (md ++ span) (e:exprs)
71 closeMarkdown (md ++ span) (e:exprs)
72 , do c <- anyChar
72 , do c <- anyChar
73 closeMarkdown (md ++ [c]) exprs
73 closeMarkdown (md ++ [c]) exprs