Show sign on interpolation if there is a failure
This commit is contained in:
parent
6fb2fa9ee0
commit
16a215a249
1 changed files with 1 additions and 1 deletions
|
@ -67,7 +67,7 @@ listTerm = markdown <|> braces (range <|> ExplicitList <$> commaSep expr)
|
|||
e <- expr
|
||||
whitespace
|
||||
string "}}"
|
||||
let span = "<span id=\"md" ++ show (length exprs) ++ "\"></span>"
|
||||
let span = "<span id=\"md" ++ show (length exprs) ++ "\" style=\"font-family:monospace;\">{{ ... }}</span>"
|
||||
closeMarkdown (md ++ span) (e:exprs)
|
||||
, do c <- anyChar
|
||||
closeMarkdown (md ++ [c]) exprs
|
||||
|
|
Loading…
Reference in a new issue