git.iko.soy/typeable/pandoc
on master help sign in
DocBook reader: drop period in formalpara title...

...and put it in a div with class `formalpara-title`, so that people can reformat with filters. Closes #6562. Thanks to rdmuller.

commite16df8d2718d3a2901c6ac0d7f35165755cde89f authorJohn MacFarlane <jgm@berkeley.edu> dateThu 19 Nov 2020, 09:33 (6 years ago) parent6b057d6
1 file changed+2−2
src/Text/Pandoc/Readers/DocBook.hs+2−2
src/Text/Pandoc/Readers/DocBook.hs+2−2
@@ -782,8 +782,8 @@ parseBlock (Elem e) =
782782 "para" -> parseMixed para (elContent e)
783783 "formalpara" -> do
784784 tit <- case filterChild (named "title") e of
785− Just t -> para . strong . (<> str ".") <$>
786− getInlines t
785+ Just t -> divWith ("",["formalpara-title"],[]) .
786+ para . strong <$> getInlines t
787787 Nothing -> return mempty
788788 (tit <>) <$> parseMixed para (elContent e)
789789 "simpara" -> parseMixed para (elContent e)