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

JATS reader: fix typo ("lable" instead of "label")

Browse source
This commit is contained in:
Alexander Krotov 2018-07-02 18:31:46 +03:00
parent f6dfb632ff
commit 5479ea300a
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -191,7 +191,7 @@ parseBlock (Elem e) =
listType -> do listType -> do
let start = fromMaybe 1 $ let start = fromMaybe 1 $
(strContent <$> (filterElement (named "list-item") e (strContent <$> (filterElement (named "list-item") e
>>= filterElement (named "lable"))) >>= filterElement (named "label")))
>>= safeRead >>= safeRead
orderedListWith (start, parseListStyleType listType, DefaultDelim) orderedListWith (start, parseListStyleType listType, DefaultDelim)
<$> listitems <$> listitems