Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

DocBook reader: Better treatment of formalpara.

Browse source 
We now emit the title (if present) as a separate paragraph
with boldface text.

Closes #1215.
This commit is contained in:
John MacFarlane 2014-04-04 22:01:12 -07:00
parent 8c014967c6
commit ee2e769cd7
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/Text/Pandoc/Readers/DocBook.hs
View file

@ -639,10 +639,10 @@ parseBlock (Elem e) =
"para" -> parseMixed para (elContent e)
"formalpara" -> do
tit <- case filterChild (named "title") e of
Just t -> (<> str "." <> linebreak) <$> emph
<$> getInlines t
Just t -> (para . strong . (<> str ".")) <$>
getInlines t
Nothing -> return mempty
addToStart tit <$> parseMixed para (elContent e)
(tit <>) <$> parseMixed para (elContent e)
"simpara" -> parseMixed para (elContent e)
"ackno" -> parseMixed para (elContent e)
"epigraph" -> parseBlockquote