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

JATS reader: Support fig-group block element (#5317).

Browse source
This commit is contained in:
John MacFarlane 2019-03-02 16:52:19 -08:00
parent a4eaacc396
commit b083a3c384
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/Text/Pandoc/Readers/JATS.hs
View file

@ -181,7 +181,10 @@ parseBlock (Elem e) =
"title" -> return mempty -- processed by header
"table" -> parseTable
"fig" -> parseFigure
"table-wrap" -> divWith (attrValue "id" e, ["table-wrap"], []) <$> getBlocks e
"fig-group" -> divWith (attrValue "id" e, ["fig-group"], [])
<$> getBlocks e
"table-wrap" -> divWith (attrValue "id" e, ["table-wrap"], [])
<$> getBlocks e
"caption" -> divWith (attrValue "id" e, ["caption"], []) <$> sect 6
"ref-list" -> parseRefList e
"?xml" -> return mempty