Indicate when a multiblock footnote is omitted.

This commit is contained in:
John MacFarlane 2011-11-17 23:13:29 -08:00
parent fcfbbd2caa
commit 823c0bcda9

View file

@ -333,4 +333,4 @@ inlineToAsciidoc opts (Note [Plain inlines]) = do
contents <- inlineListToAsciidoc opts inlines
return $ text "footnote:[" <> contents <> "]"
-- asciidoc can't handle blank lines in notes
inlineToAsciidoc _ (Note _) = return empty
inlineToAsciidoc _ (Note _) = return "[multiblock footnote omitted]"