aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2018-07-02 18:31:46 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2018-07-02 18:31:46 +0300
commit5479ea300a5c02d63fe1ffafb060bfa1134b4f97 (patch)
treea9f657b8aa1f52929185172c139ef84fd2a10567 /src
parentf6dfb632ff38cc9dd5156297959ce8028fd766ea (diff)
downloadpandoc-5479ea300a5c02d63fe1ffafb060bfa1134b4f97.tar.gz
JATS reader: fix typo ("lable" instead of "label")
Diffstat (limited to 'src')
-rw-r--r--src/Text/Pandoc/Readers/JATS.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/JATS.hs b/src/Text/Pandoc/Readers/JATS.hs
index 59af76d23..695c86b5d 100644
--- a/src/Text/Pandoc/Readers/JATS.hs
+++ b/src/Text/Pandoc/Readers/JATS.hs
@@ -191,7 +191,7 @@ parseBlock (Elem e) =
listType -> do
let start = fromMaybe 1 $
(strContent <$> (filterElement (named "list-item") e
- >>= filterElement (named "lable")))
+ >>= filterElement (named "label")))
>>= safeRead
orderedListWith (start, parseListStyleType listType, DefaultDelim)
<$> listitems